if($ftp -> supported("RNFR") && $ftp -> supported("RNTO")) {
	print "rename supported!\n";
	print "Es folgt RENAME\n";
	if ($ftp->command('RNFR', 'tmpdevelop/test_ftp.pl') && $ftp->command('RNTO','tmp/test.pl')) {
		print "Es folgt ISFILE\n";
		if ($ftp -> isfile ("tmp/test.pl")) {
			print "Erledigt!\n";
		}
	}
	else {
		print "Fehler >" . $ftp->message . "<\n";
	}
}