- 737 名前：デフォルトの名無しさん mailto:sage [2008/01/30(水) 05:56:58 ]
- >735
つーかマテ、その改造コード間違ってるんじゃねーか。
$file が全く関係ないところに書かれてる。
そのコードじゃカレントディレクトリ全部削除されるぞ。
$file = <STDIN>; と書くんだったら、
for (glob '*') { $_ eq $file or unlink $_ } にしなきゃ。
$ARGV[0] はコマンドラインからの引数な。
>734 はファイル名を引数として渡してる。
