-i -e "s|^.|ok|" ./text どこが間違っているのでしょうか？

$ cat ./text
aaa
bbb

$ perl -i -e "s|^.|ok|" ./text
これを実行しても、./text に変化がありません。
どこが間違っているのでしょうか？

$ cat ./text
okaa
bbb
となることを期待しています。

No.4 ベストアンサー 回答者： root139 回答日時： 2009/04/01 16:37

スイッチ0でレコードセパレータをNull文字にしてみては？

例) -----------------------------------------------------------------
perl -p0e 's|^.|ok|' ./text
---------------------------------------------------------------------

参考URL：http://www.ibm.com/developerworks/jp/linux/libra …

この回答へのお礼

ありがとうございます！
大成功です！！
行番号を使わないので応用が利きます！
参考URLまでご提示いただいて本当にありがとうございました！！
後からプログラミングPerl(第3版はP.578)の-0見ましたが、
さっぱりわからず、root139様の例の方が圧倒的に理解しやすいです！！
本当にありがとうございました。

お礼日時：2009/04/01 22:06

No.3 回答者： Tacosan 回答日時： 2009/04/01 16:35

$. に「現在の行番号」が入ります. したがって

-pe "s/^./ok/ if $. == 1"
が素直.

この回答へのお礼

ありがとうございます！
成功しました！！
しかし、mtaka2様と秒差だったようで...(^^;;

お礼日時：2009/04/01 21:56

No.2 回答者： mtaka2 回答日時： 2009/04/01 16:35

> perl -i -pe "s|^.|ok| if ($.==1); close ARGV if eof;" test

でどうでしょうか。

close 以下は、複数のファイルを指定した時に、行番号をリセットさせるためです。1ファイルしか指定しない場合は不要。

この回答へのお礼

ありがとうございます！
成功しました！！

お礼日時：2009/04/01 21:54

No.1 回答者： Tacosan 回答日時： 2009/04/01 13:13

入出力を全くしていない, に 1票.

-e オプションは「実行内容を指定する」だけです. つまり, 今の場合は
$_ の最初の文字を「ok」に置き換える
だけ. つまり, text の内容を読み込んでいないし何かを出力するということもありません.

この回答へのお礼

ありがとうございます！
何も作用してないのですね...

皆様
この場合、どうすれば良いのでしょうか？

perl -pe 's|^.|ok|' ./text
とすると、
okaa
okbb
となってしまいます。
while(<>) 前に1行化させることができるのでしょうか？

お礼日時：2009/04/01 13:26