>>216
>my $a = $_[0], $b = $_[1], %h = %{$_[2]};
my ( $a = $_[0], $b = $_[1], %h = %{$_[2]} ) ;
と判断しても、
( my $a = $_[0], my $b = $_[1], my %h = %{$_[2]};
と判断しても、、、

この前もどっかのスレで見たが、こんなトンチンカンな書き方を何処で
覚えてくるんだろう？後者は strict, warnings が通ってしまうから
なおさら、、、