hi everybody,
pls let me know what is wrong with this piece of code...
----------------------------------------------------------

#!/usr/bin/perl 
use LWP::Simple;

my $x = ' ';
$x = get("ftp://144.16.71.2/pub/pdb/pdb1ax0.ent";);

if ($x eq "")
{
 print "FTP not working";
}
print $x;

-------------------------------------------------------

thanks,
prats.


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to