foreach、forの活用

for my $var (@list) BLOCK
EXPR for @list
BLOCKの実行時、$varは@list要素のエイリアス
$_ += $tick for @list;
$varは省略されると$_
EXPR for @list形式のときは$_に固定
print "$_=$ENV{$_}\n"
    for sort keys %ENV;
リスト要素がひとつのときもよく使う
for ($text) {
  s/oldtext/newtext/g;
  /found (.*?) / and found($1);
}
local ($_) = $text
スレッドPerlでは$_はレキシカル??