10 lines
169 B
Perl
10 lines
169 B
Perl
|
#!/usr/bin/perl
|
||
|
|
|
||
|
|
use warnings;
|
||
|
|
|
||
|
|
@array = ("one", "two", "three");
|
||
|
|
foreach $iterator (@array) {
|
||
|
|
print "The value of the iterator is now $iterator \n";
|
||
|
|
}
|
||
|
|
|
||
|
|
|