見るともなく古いファイルを見ていたら、変なコードを見つけた。
sub get_1 {print 'a'; 1;}
sub get_2 {print 'b'; 2;}
sub get_3 {print 'c'; 3;}
print get_1;
print get_2;
print get_3;
print "\n";
print "-----\n";
print get_1,
get_2,
get_3,
"\n";
print "-----\n";なんだろう？と思って実行してみてびっくりした。
どこかで見た記憶があったので探してみたら、「a geek - perlの評価順」だった。
同じネタで何度もびっくりしてしまうのは、記憶力の欠如ですか？
