>>164
色々試してくれてありがと。

hoge.plでは

print "好きな数字は？:";
$s=<STDIN>;
print "好きな数字は$s\n";

のみにしてみた。

in.txtは「１」だけ入れたけど、失敗

ちょっと。ActivePerl build 819に変えてやってみます。817だったので