Is there some way to make the Net:FTP work after the client switched from a static to a dynamic IP address. Here is my code:
$ftp = Net::FTP->new("$ftp_server_name", Debug => 0) or Win32::MsgBox("Unable to Connect to BargainTix Server", 64, "BargainTix.com"), die(""); #&server_error, ,
$ftp->login("$ftp_user","$ftp_pass");
$ftp->binary;
$ftp->put("$upload_filename");
$ftp->quit;
Win32::MsgBox ("Upload Successful\!", 64, "BargainTix.com");
system("del \"$upload_filename\"");
_______________________________________________ Perl-Win32-Users mailing list Perl-Win32-Users@listserv.ActiveState.com To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
