perl -p -i.bak -e "!a!A!g" *

質問

をコマンドラインで実行すると
ファイルをオープンできないとのエラーが出ます。
ちなみに
perl -p -i.bak -e "!a!A!g" x.txt
ならばＯＫです。
ディレクトリ内のすべてのフィルに適用したいのですがどうしたらいいでしょうか？

WindowsXP　に最新版のＰｅｒｌを入れて実行しています。

回答No.3

BLUEPIXY · ベストアンサー

perl -i.bak -p -e "BEGIN{@ARGV=split('\0',`perlglob @ARGV`)}s/a/A/g" *
のようにしてみて下さい。
たびたびこういうことが必要なら、バッチとPerl を使って簡略化すればいいと思います。

お礼

ありがとうございます。
そうします。

回答No.2

Tacosan

UNIX ならシェルが展開するんだけど DOS とか Windows だと自分で展開しなきゃならない. なので, ちょっと意味が変わるけどこれが一番近いかな?
for /F "delims=: tokens=*" %f in ('dir /B /A-D') do @perl -p -i.bak -e "!a!A!g" "%f"
UNIX に翻訳すると
for f in `dir *`; do perl -p -i.bak "!a!A!g" "$f"; done
のような感じ.

お礼

ありがとうございます。
とにかく簡単にはできないことがわかりました。

回答No.1

noname#25358

マイクロソフト系のＯＳはワイルドカード展開をアプリケーション側で行うからです。

　Perl に対して "*" というファイル名がそのまま渡ってしまうため、それをオープンできずにエラーになってしまうのです。
　Unix 系のＯＳは、ほとんどのケースではシェル側で展開するんですよね。たしか。

お礼

ありがとうございます。
何か対処方法はないでしょうか？