> > できるよ > > sub KANSU { > > my ($val, $arr) = @_; > > print "変数 $val\n"; > > print "配列の最初 ${$arr}[0]\n"; > > } > > こんな感じじゃなかったか > @_って何? サブルーチンの引数の人は、みんな@_に押し込められて渡されるんだ… きっと辛いだろう。苦しいだろう。 お前もその分考慮して使ってやれ。 参考:2004/10/20(水)16時28分32秒