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