perl
非常に長いディレクトリ パスを通過するスクリプトを作成しようとしています\dir1\dir2\dir3\.....\dir99
。
私find
はその道を通っています。
ディレクトリ構造は次のようなものです。
E:\work\important stuff\dir1
dir2
繰り返した後、たとえば通過します
E:\work\important stuff\dir1\dir2
スラッシュの間にあるものを nameregex
に置き換えるa を書き込もうとしています。目的は、パスを短くして削除できるようにすることです。\
\
a
最終的にパスは次のようになります。
E:\work\important stuff\a\a\a\....\a.
何か案は ?