単一のディレクトリで、各ファイルの最初の行をファイル名に変更したいと思います。各ファイルの最初の行は「TestRelation」です。ファイル名に変更したい。
私はそれをperl -pi -w -e 's/SEARCH_FOR/REPLACE_WITH/g;' *.txtすべてのファイルを閲覧するために使用できることを知っています。しかし、ファイル名の「REPLACE_WITH」を動的に変更するには？
ベストアンサー1
努力する：
perl -i.bak -wpe 's/SEARCH_FOR/$ARGV/g' *.txt
$ARGVを読むときに現在のファイルの名前が含まれています<>。
スイッチを使用しているので-i心配する必要はありません。セキュリティへの影響perl-nまたはスイッチを使用して実行するとき-p。