【Perl 】初心者コーナーPart5

ああリダイレクトが、パイプが…！(嬉)
上等です。_gunzipさん感謝っ！
.
.
.
…ただ付属のmksos.comがうまくいかないのは俺だけ？(;´Д`)
デフォルトがjperlだし(;´Д`)

しょうがないのでrunperl.com
#perl %0 %@
($program = $0) =~ s{^.*[/\\]|\.[^./\\]*$}{}g;
exec 'perl', $program, @ARGV;
exit $!;