Front page | perl.beginners |
Postings from April 2002
RE: ftp
Thread Previous
From:
Michael Gargiullo
Date:
April 3, 2002 07:18
Subject:
RE: ftp
Message ID:
NGBBJEADBDIGMPLAMOCNAEMJCCAA.gargiullo@comcast.net
The file is huge... timing out on your machine maybe?
I made 2 little modifications and it ran.
#!/usr/bin/perl -w
use LWP::Simple;
my $x = get("ftp://144.16.71.2/pub/pdb/pdb1ax0.ent"); # Combined the my and
the get
if ($x eq "")
{
print "FTP not working";
}
print "$x"; #Quoted the Var
Worked for me
-Mike
-----Original Message-----
From: mnp4@bgl.vsnl.net.in [mailto:mnp4@bgl.vsnl.net.in]
Sent: Wednesday, April 03, 2002 7:56 AM
To: beginners@perl.org
Subject: ftp
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: beginners-unsubscribe@perl.org
For additional commands, e-mail: beginners-help@perl.org
Thread Previous
-
ftp
by mnp4
-
RE: ftp
by Michael Gargiullo