Re: Perlを用いて、ファイル名をそのファイルの一行目に挿入するにはどのようにすれば...
http://www.cjrda.com/detail/q1165049091
こんなのでいいんじゃないですかね。
% cat テキスト.txt 元のテキストです. % perl -i.bak -wlp -e 'print $ARGV if $. == 1' テキスト.txt % cat テキスト.txt テキスト.txt 元のテキストです.
しかしベストアンサーはあれだな.
http://www.cjrda.com/detail/q1165049091
こんなのでいいんじゃないですかね。
% cat テキスト.txt 元のテキストです. % perl -i.bak -wlp -e 'print $ARGV if $. == 1' テキスト.txt % cat テキスト.txt テキスト.txt 元のテキストです.
しかしベストアンサーはあれだな.