Create shobo_cal.pl

ファイル名変換　perl 版