Quoting patrick on sten <[EMAIL PROTECTED]>:

> 
> 
> I don't know how to do it with plain bash, but
> I make a page called ipaddress.html and then
> send it to ihug with an expect script running lftp.

And here is something in perl that I've used heaps of times...

#!/usr/local/bin/perl
#
# $Id: ftp_file.pl,v 0.1 2000/03/23 02:34:09 michaelf Exp $
#
# A Script to FTP a file

use Net::FTP;

my $host = "ourhost.domain.com";
my $user = "username";
my $password = "password";
my $remote_dir = "remotedir";
my $local_dir = "/tmp";
my $remote_file1 = "remotefile.html";
my $local_file1 = "localfile";

chdir($local_dir);
my $ftp = Net::FTP->new($host);
$ftp->login($user, $password) || die "Couldn't login to $host: $!";
$ftp->cwd($remote_dir) || die "Couldn't cd to $remote_dir: $!";
$ftp->ascii || die "Can't change mode to ASCII: $!";
$ftp->put($local_file1, $remote_file1) || die "Couldn't get $local_file1: $!";
$ftp->quit;
-- 
SLUG - Sydney Linux User's Group - http://slug.org.au/
More Info: http://lists.slug.org.au/listinfo/slug

Reply via email to