sub Function(\[$@%]);
これはWindows (Windows 7 の Perl v5.14.2) で動作し、3 種類の引数すべてを受け入れます。ハッシュ、スカラー、およびリスト。
ただし、Linux (CentOS リリース 4.5 の Perl 5.6.1) で同じプロトタイプを使用すると、
Malformed prototype for main::Function: \[%@$].
両方で、私はやっていuse 5.006
ます。
それ以外は、スクリプトはまったく同じです。