Here is a small simple script that i use:
!/usr/local/bin/perl -w
use Net::FTP;
$hostname = 'whereever.net';
$username = 'whoever';
$password = 'whatever';
# Hardcode the directory and filename to get
$home = '/home/';
$filename = 'index.html';
# Open the connection to the host
$ftp = Net::FTP->new($hostname); # construct object
$ftp->login($username, $password); # log in
$ftp->cwd($home);#,"\n"; # change directory
# Now put the file and leave (could be get also)
$ftp->put($filename);
$ftp->quit;
Josh Cooper
Database Administrator
United States Aluminum
Phone: 1-800-627-6440 X590
Efax: 1-520-396-4827
Hi,
Can someone please tell me how I can ftp a file using perl: Net module.
Greatly appreciate this help.
Thanks in advance!
Sudha
Sudha M.Natarajan
SAGE III Mission Operations Software Engineer
G&A Technical Software at NASA Langley Research Center MS-475
Hampton, VA. 23861-2199
Voice: (757) 864-6865,
FAX: (757) 864-8461
[EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]>
