I want to make a remote search engine. But there is some problem. What is the perl command to "detect" the last modification date of a remote file???
THANKS A LOT!!!!!!!
But there's still some problems...
when I use this code:
--------------------------------------------
#!/usr/local/bin/perl
use LWP::UserAgent;
my $agent = new LWP::UserAgent;
my $req = new HTTP::Request ('GET', 'http://members.tripod.com/mp3oricon/');
my $resp = $agent->request ($req);
print "Content-type: text/html\n\n";
print "Last Updated: ", scalar localtime $resp->last_modified(), "\n";
--------------------------------------------
the browser print out "Last Updated: Wed Dec 31 16:00:00 1969"
actually this file is last updated at 1999/6/6 AM 06:05
Also I dont want 'Wed' and '16:00:00' to be showed up, can it be done??
[This message has been edited by jpop (edited June 07, 1999).]
[This message has been edited by jpop (edited June 07, 1999).]
But there's still some problems...
when I use this code:
--------------------------------------------
#!/usr/local/bin/perl
use LWP::UserAgent;
my $agent = new LWP::UserAgent;
my $req = new HTTP::Request ('GET', 'http://members.tripod.com/mp3oricon/');
my $resp = $agent->request ($req);
print "Content-type: text/html\n\n";
print "Last Updated: ", scalar localtime $resp->last_modified(), "\n";
--------------------------------------------
the browser print out "Last Updated: Wed Dec 31 16:00:00 1969"
actually this file is last updated at 1999/6/6 AM 06:05
Also I dont want 'Wed' and '16:00:00' to be showed up, can it be done??
[This message has been edited by jpop (edited June 07, 1999).]
[This message has been edited by jpop (edited June 07, 1999).]