in reply to Need Net::FTP delete help

Hi All,

When the customer's Internet comes backup up (we are dead nuts on the Pineapple Express and are having 85+ MPH winds and he turned everything off, plus Charter is down city wide), I am going to try:
sub DeleteDirectly ( $ ) { my $Target = $_[0]; print "Attempting to delete $Target\n"; if ( $ftp->quot ( "delete", "$Target" ) ) { print "File $Target was quot deleted\n\n"; } else { print "File $Target failed to quot delete\n\n"; }; }