------
BeanShell
------
/*
 * ftps_exp.bsh
 *
 * 日本語のファイル名を扱うので注意点があります。
 * - このファイル自身はSJISで書く。
 * - ExFtpsClient#setControlEncoding("UTF-8") が実行されていることを確認する。
 *
 * 2025/01/15 新規作成
 */
import ushi.net.ExFtpsClient;

ExFtpsClient client = new ExFtpsClient();

if(! client.connect("localhost", 2121, "normuser", "MyFtpPw", "G-FOLDER")) {
    exit(1);
}

//// グロブではなく正規表現なので注意。またJavaコード中だとエスケープも必要
//int count = client.moveRegexMatched("[ABC].*\\.dat", "backup");
int count = client.moveNlstMatched("[ABC]*.dat", "backup");
print(count + " file(s) are moved successfully.");

String[] files = { "A202501130800.dat", "B202501130800.dat", "C202501130800.dat" };
client.mput(files, "./input");

// ディレクトリがなければ作成
if(client.mkdirIfNotExists("G12345")) {
    // 作成できたら、その中にファイルを一個送る
    final String fileName = "G12345回答書.txt";
    if(! client.storeFile("G12345/" + fileName, "./input/" + fileName)) {
        print("Ootto! cannot store file :[" + fileName + "]");
    }
} else {
    print("Ootto! cannot create subdirectory!");
}

client.logout();
client.disconnect();
// end.
------
PHP
------
<?php
/*
 * php.iniで
extension=ftp
extension=openssl
 * を有効にしておきます。
 *
 * このプログラムでは特に日本語のファイル名を扱います。
 * このファイル自身はUTF-8で書く必要があります。
 * プログラム内部で明示的なエンコーディングが必要な個所はありません。
 *
 * また実行するとウィルスの検疫に隔離されることがあるので、
 * その場合は安全なファイルに指定して復元します。
 *
 * 2025/01/15 新規作成
 */

/*===================================================================*
 * $remoteDirがなければ作成します。既にあれば何もしません。
 *===================================================================*/
function mkdirIfNotExists($ftp, $remoteDir, $cdf=false){
    // 移動するフラグがなければ、戻る先を覚えておく
    $curDir = ($cdf ? "" : ftp_pwd($ftp));

    $raw_result = ftp_raw($ftp, "CWD " . $remoteDir);
    //var_dump($raw_result);
    // 移動できなかったらディレクトリを作成
    if (strpos($raw_result[0], '250 ') === false) {
        print("creating directory $remoteDir\n");
        ftp_mkdir($ftp, $remoteDir);
        // 移動するフラグがあれば移動する
        if($cdf){
            print("moving directory $remoteDir\n");
            ftp_chdir($ftp, $remoteDir);
        }
    }

    // 移動するフラグがなければ、元のディレクトリに戻る
    if(! $cdf){
        ftp_chdir($ftp, $curDir);
    }
}

/*===================================================================*
 * ここからメイン
 *===================================================================*/
$ftp = ftp_ssl_connect("localhost", 2121);

if(! ftp_login($ftp, "normuser", "MyFtpPw")){
    // この場合は、すでに PHP 側で E_WARNING レベルのメッセージを発行しています。
    die("can't login");
}

if(! ftp_chdir($ftp, "G-FOLDER")){
    die("Ootto! cannot change directory.");
}

// 既にあるファイルをbackupディレクトリに移動する
$files = ftp_nlist($ftp, "[ABC]*.dat");
foreach($files as $fname){
    ftp_rename($ftp, $fname, "backup/" . $fname);
}

$files = [ "A202501130800.dat", "B202501130800.dat", "C202501130800.dat" ];
foreach($files as $fname){
    // デフォルトでバイナリモード
    if(! ftp_put($ftp, $fname, "./input/" . $fname)){
        print("Ootto! cannot store file:" . $fname . "\n");
    }
}

// サブディレクトリがなければ作り、有無を問わずそこへ移動する
mkdirIfNotExists($ftp, "G12345", true);

$fname = "G12345回答書.txt";

if(! ftp_put($ftp, $fname, "./input/" . $fname)){
    print("Ootto! cannot store file:" . $fname . "\n");
}

ftp_close($ftp);

// end.