PHP-прогерам: можете затестить у себя рекурсивное копирование на фтп? Оч надо.

Пожалуйста, протестируйте рекурсивное копирование файлов и папок на фтп. Сам сейчас не могу :(

// $myftp - Идентификатор соединения с FTP сервером.

// запуск:

define('THIS_DIR', dirname(__FILE__) . '/');
$pwd = ftp_pwd($myftp);
recursive_ftp_copy(THIS_DIR . "copy", $pwd);

function recursive_ftp_copy ($from, $to) {
global $myftp;
	if (substr($from, -1) != '/') $from .= '/';
//	if (substr($to, -1) != '/') $to .= '/';
	if (is_dir($from) === FALSE) return;
	$pwd = ftp_pwd($myftp);
	if (($to != $pwd) AND (ftp_is_dir($to) === FALSE)) { ftp_mkdir($myftp, $to); ftp_chmod($myftp, 0777, $to); }
	
	
	if (($op = opendir($from)) !== FALSE) {
		while (($file = readdir($op)) !== FALSE) {
			if (($file != '.') AND ($file != '..')) {
				if (is_dir($from . $file)) {
					ftp_chdir($myftp, $file);
						recursive_ftp_copy($from . $file, $file);
					ftp_chdir($myftp, $pwd);
				} else {
					my_ftp_put($myftp, $file, $from . $file);
					ftp_chmod($myftp, 0777, $file);
				}
			}
		}
		
		closedir($op);
	}
		return;
}

function ftp_is_dir ($dir) {
global $myftp;

$original_directory = ftp_pwd($myftp);

	if (@ftp_chdir($myftp, $dir)) {
		ftp_chdir($myftp, $original_directory);
		return true;
	} else {
		return false;
	}       
}


if (!function_exists('ftp_chmod')) {
    function ftp_chmod($ftp_stream, $mode, $filename) {
        return ftp_site($ftp_stream,  'CHMOD ' . $mode . ' ' . $filename); /*sprintf('CHMOD %u %s', $mode, $filename));*/
    }
}

function my_ftp_put($myftp, $file, $from) {
	$type = FTP_ASCII;
	$ftype = strtolower(end(explode('.', $from)));
	
	if (($ftype == 'jpg') OR ($ftype == 'jpeg') OR ($ftype == 'gif') OR ($ftype == 'png') OR ($ftype == 'bmp') OR ($ftype == 'ico')) {
		$type = FTP_BINARY;
	}
		
		return ftp_put($myftp, $file, $from, $type);
}

Буду благодарен, если поможите оттестить и(ли) указать на ошибки.