2004-12-21 ■ Perl perl -e'for(@ARGV){if(/^aaa(.*)$/){ rename $_, "bbb".$1; }}' *ファイル名をaaa*からbbb*に変更、するはず。