use LWP::Simple;
use warnings;
use strict;
my $url = 'ftp://ftp.symantec.com/public/english_us_canada/antivirus_definitions/norton_antivirus_corp/';
my $content = get($url);
print "$content\n"; #prints unix filesytem listing
####
total 230628
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 987053 Jan 23 15:53 20040123-007-i32-1.exe
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 1325979 Jan 23 15:53 20040123-007-i32-2.zip
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 1137726 Jan 23 15:53 20040123-007-i32-3.zip
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 1137848 Jan 23 15:53 20040123-007-i32-4.zip
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 4599122 Jan 23 15:53 20040123-007-i32.exe
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 3109802 Jan 23 15:53 20040123-007-o32.zip
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 8658502 Jan 23 15:53 20040123-007-unix.sh
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 7637800 Jan 23 15:53 20040123-007-x86.exe
-rwxrwxr-x 1 hevasymantec-ftp4 hevasymantec-ftp4 987048 Jan 26 18:38 20040126-021-i32-1.exe
.....more lines etc...
####
Directory listing for /public/english_us_canada/antivirus_definitions/norton_antivirus_corp/Current directory is /public/english_us_canada/antivirus_definitions/norton_antivirus_corp/
..
20040123-007-i32-1.exe
20040123-007-i32-2.zip