>>454
>パラメータは引数で渡しましょう。

これができないんですけど・・・
perlの中に外で定義した変数とかはとりこめない・・・