how about converting the times to epoch time and then compare?
have a look at timelocal to convert to epoch time....

> -----Original Message-----
> From: Alex Harris [mailto:[EMAIL PROTECTED]]
> Sent: Monday, January 07, 2002 11:38
> To: [EMAIL PROTECTED]
> Subject: comparing dates
> 
> 
> 
> 
> if I use the following to get the date of a file:
>     use File::stat;
>     use Time::localtime;
>     $date_string = ctime(stat($file)->mtime);
>     print "file $file updated at $date_string\n";
> 
> I get:
>    Mon Jan  7 10:21:21 2002
> 
> Now I want to compare another file date to this one getting 
> the date the 
> same way but I don't understand the following example:
> 
>     sub getdate {
>       local($_) = shift;
>       s/-(\d{4})$/+$1/ || s/\+(\d{4})$/-$1/;
>           # getdate has broken timezone sign reversal!
>       $_ = `/usr/local/lib/news/newsbin/getdate '$_'`;
>       chop;
>       $_;
>     }
> 
> I can't use c modules because they haven't been added and I 
> don't have 
> permissions.  TIA
> 
> _________________________________________________________________
> Send and receive Hotmail on your mobile device: http://mobile.msn.com
> 
> 
> -- 
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
> 

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

Reply via email to