if ( $ftp->delete ( "$Target/$FileName" ) ) {
   print "File <$Target/$FileName> was deleted\n";
   } else {
   print "File <$Target/$FileName> failed to delete\n";
}