「Perl分かってる」と思わせる1行

[0008 nobodyさん 2007/10/09(火) 07:15:33 ID:???]

>>1
こういうのだろ
return ($a =~ s/@{$_[0]}/$$_[1]{$c}->{$d}/g);