$ftp->get($file) or $error_flag = 1;
$ftp->quit if $error_flag;
$ftp->delete($file) or $error_flag = 1;
$ftp->quit if $error_flag;