5 lines
140 B
Perl
5 lines
140 B
Perl
|
@array = ("one", "two", "three");
|
||
|
for ($loop_index = 0; $loop_index <= $#array; $loop_index++) {
|
||
|
print $array[$loop_index] . " ";
|
||
|
}
|