refの旧書式から新書式へ
以下の作業は必ずバックアップを取ってから行って下さい。
変換ワンライナー
下記をwiki内で実行
perl -p -i -e 's|([#&]ref\()([^,]+),\[\[([^\]]+)\]\]|$1$3/$2|g' *.txt
日付の保持
Devel/ShellScript/複数ファイルの文字列置換(日付保持)と合わせれば、
日付を保持*1したまま、書式を変更できる。
find -type f -name \*.txt -exec cp -p {} {}.bk \;
perl -p -i -e 's|([#&]ref\()([^,]+),\[\[([^\]]+)\]\]|$1$3/$2|g' *.txt
find -type f -name \*.txt -exec perl -e '@ts=stat($ARGV[0].".bk"); utime $ts[8],$ts[9],$ARGV[0]' {} \;
rm -f *.bk
