今日のぺるる　$_ の続き。

2006-05-11T10:50:40+09:00

my @a = ("a", "b", "c");

for (@a) {
    for (@a) {
        print $_;
    }
    print "\n  $_\n";
}
__END__
abc
  a
abc
  b
abc
  c

ちゃんとブロックローカル (?) だった。

nulog, NULL::something : out of the headphone > 2006 > May > 11 > 今日のぺるる $_ の続き。