TSperl 発言

　極悪さん　おおきに！
                        　なむnomotoです

  ロングファイルネームをperlで処理して、短くなったネームファイルに
  Kctrans.exe をくぐらせるのですね。
  
　試しました。
　　変更→　    $outfile =~ s/^(X[0-9]+)_[0-9]+\..*$/$1.txt/i;
　　　ロングファイルネーム関連ファイルは一括できましたが、
　　　Kctrans.exe をくぐってないらしく、
　　　Big5コードがSjisになっていません。
　　　　　　エラーの表示はありません。
 ---------------------<Batで実行した結果
cat X1557_001.txt => X1557.txt
cat X1557_002.txt => X1557.txt
cat X1557_003.txt => X1557.txt
cat X1557_004.txt => X1557.txt
cat X1557_005.txt => X1557.txt
cat X1557_006.txt => X1557.txt
cat X1557_007.txt => X1557.txt
　　　:::::省略
cat X1563_001.txt => X1563.txt
cat X1563_002.txt => X1563.txt
cat X1563_003.txt => X1563.txt

kctransing X1557.txt
 ---------------------<
 上記のように表示されて、X1557.txt が失われています。
 他の合体ファイルは残っています。
 Kctransing が行われず止まっているのは、変換後のファイルの
 行き先が指定してないからなんでしょうか？
 　　　　　　わかんないや(^^;)
 [データソース]
 Big5コード　『卍續藏』の79卷は、下記でダウンロードできます。
　http://cbeta.buddhist-canon.com/result/X79.htm
　この１つ前の頁の最下に、『卍續藏』一覧があります。