3

module-starter で開始された Perl モジュール Foo::Bar があり、名前空間 Foo::Bar の下に既にいくつかのパッケージがあり、名前の選択が不適切であるという結論に達し、それを MyBetterName と呼びたいとします。 :バー。

すべてのモジュール、ポッド、テスト、およびサンプルを置き換える必要なく、このプロセスを自動化するのに役立つツールはありますか? それを行うための perl スクリプトを作成できることはわかっていますが、perl モジュールを作成するのは初めてで、どのファイルを含める必要があるかよくわからないとします。

Google を試しましたが、役立つと思われるものは何も見つかりませんでした

4

1 に答える 1

4

Foo::Bar と Foo/Bar をグローバルに置き換えるには十分なはずです

find -type f -exec perl -i -pe's{Foo(::|-|/)Bar}{MyBetterName${1}Bar}g;' {} +

次に、ファイル自体の名前を変更します

find -depth -execdir rename 's/Foo/MyBetterName/g' {} \;
于 2013-07-31T01:10:12.143 に答える