2007-12-30 参照渡し CGIBOY ■perl で参照渡しroutine(\%a);sub routine(%a) { my $a = @_; print %$a; print $a->{1}; }さらに,\%$a とかってやれば参照を参照渡し出来る.変数をコピーしないようにすると強烈に速くなる.