近頃版/another blog@hatena/Wiki/BBS
< {Perl}ExcelPrinter.pm
ファイル名にスペースとか半角括弧とか入っているとUNIX的には微妙に辛い目に会えるわけですよ。findでファイル一覧取ってきてフィルタに食わせたらスペースで区切られて残念なことになったりとかで。しかもそのままsvnに突っ込んでたりしてた俺。仕方ないのでこんなワンライナーでスクリプトの原型を吐かせてどうにかした。
find . | grep ' ' | grep -v .svn | perl -ne 'chomp();$orig = $_;$orig =~ s/([ \(\)])/\\$1/g; s/ //g;s/[\(\)]/_/g; print "svn mv $orig $_\n"'