blazar, maybe he wants to migrate from ksh to an oister shell :-P jejeje

anyway, i haven't sleept too much today, so for keeping me on, i decided to translate it:

#!/usr/bin/perl

# Give port or mention server name
my $ip='some.machine';

#User ID to login into remote server
my $user='anonymous';

#Password to login in remote server
my $pass='super-secret';

open (FTP, "|-", "/usr/bin/ftp -n");
print FTP <<EOF ;
open  $ip
quote user $user
quote pass $pass
lcd
bye
EOF
print "*$_\n" while (<FTP>);
close FTP;
[download]

Janitored by Corion: Changed machines and login/password