Beefy Boxes and Bandwidth Generously Provided by pair Networks
Keep It Simple, Stupid

Re: FTP wtih Perl

by DigitalKitty (Parson)
on Nov 23, 2006 at 05:39 UTC ( #585671=note: print w/ replies, xml ) Need Help??

in reply to FTP wtih Perl

Hi Anonymous Monk.

I agree with the other monks in that perl should be fully capable of receiving/transferring a 1.5G file. If an issue arises, it might be on the ISP side. The following code is untested and was modelled on the perldoc example.

#!/usr/bin/perl -w use strict; use Net::FTP; my $ftp; $ftp = Net::FTP->new("my_host", Timeout=>240, Debug => 0) or die "Error: $@"; $ftp->login('id','password') or die "Error: ", $ftp->message; $ftp->cwd("/folder") or die "Error with cwd command: ", $ftp->message; $ftp->put('filename to transfer', 'filename it will be called on the r +emote server') or die "Error in transfer: ", $ftp->message; $ftp->quit;

Additional information can be found at:

Hope this helps,

Comment on Re: FTP wtih Perl
Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://585671]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others pondering the Monastery: (12)
As of 2015-10-09 13:11 GMT
Find Nodes?
    Voting Booth?

    Does Humor Belong in Programming?

    Results (242 votes), past polls