Mega Code Archive

 

Categories / Perl / Statement

 

The foreach Loop

#Format: #foreach VARIABLE (ARRAY) #{BLOCK} #!/usr/bin/perl foreach $pal ('A', 'B', 'H', 'P') {     print "Hi $pal!\n"; }