actually, the "foreach" in the one-liner above is treated as more like my personal fav'rit use of "if", i.e.

print $line if $line =~ /Perl/;
[download]

e.g. "do this IF that"; similarly, the "foreach" says "do this for each of these." It's with constructs like these that you can tell Perl was designed by a linguist =)