For some reason when I use NET:FTP's get. I will get an error of "Bad
file descriptor". What does this mean. Here is my code.
I left stuff out last time.
use Net::FTP;
$ftp = Net::FTP ->new("$ip_address",
Timeout => 200,
debug => 1,
ftp_passive => 1)
or die "Can't connect: $!n";
$ftp->login($username, $password)
or die "Still couldn't authenticate.\n";
$ftp->binary
or die "could not set to binary. $!\n";
#the FTP site is a 3 tiered system. First folder is called "23" second
folder is called 365"
#and the file is called "369_0.jpg". I need the whole file name which is
"23365369_0.jpg"
#
$pin_folder = "photo/23/365/";
$ftp->cwd("$pin_folder")
or die "Couldn't change to dir $pin_folder: $!\n";
print "Start FTP.\n";
$file = "369_0.jpg";
$rename = "23365369.jpg";
$ftp->get("$file", "$rename")
or $status = "not found: $!";
print "$status\n";
$ftp->quit();
Michael Kramer
[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]