SPUG: Dates, anyone?

ashley apond at amazon.com
Thu Dec 30 20:48:12 CST 1999


my late two cents.

though this module is too slow for large data manipulation
it rules otherwise: 

perldoc Date::Manip

totally flexible and will allow for many different kinds
of input, including strings. i have a nice little script
that i'd share but it's work for hire. :)

-ashley

Steve Laybourn wrote:
> 
> Hello!
> 
> I'm just a bit late with this posting, which I found out went to the  wrong
> place the first time I posted it.
> 
> Here's a way I deal with changing a UNIX time into a valid time/date stamp:
> 
> @statz=stat("wossname.pl"); # or whatever file
> $mz="Jan/Feb/Mar/Apr/May/Jun/Jul/Aug/Sep/Oct/Nov/Dec";
> $wkd="Sunday/Monday/Tuesday/Wednesday/Thursday/Friday/Saturday";
> ($sec,$min,$hour,$day,$nmon,$year,$wday,$yday,$isdst)=localtime($statz[9]);
> if ($year<80) { $year+=2000; } else { $year+=1900; }
> $wk=(split("/",$wkd))[$wday];
> $mn=(split("/",$mz))[$nmon];
> $lastmod=sprintf("%s, %s-%s-%s %02d:%02d:%02d
> PDT",$wk,$day,$mn,$year,$hour,$min,$sec);
> 
> This turns a large number of seconds into something like:
> 
> Thursday, 30-Dec-1999 14:59:43 PDT
> 
> I know this is probably not the best way to do this, but you don't have to
> refer to any external modules and you can customize the subroutine to output
> the date in any format you like...
> 
> Hope this helps!
> Steve Laybourn
> 
> The answer to your question REALLY is: Five tons of flax!
> 
> ______________________________________________________
> Get Your Private, Free Email at http://www.hotmail.com
> 
>  - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
>     POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
>  Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
>  SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
>         Email to majordomo at pm.org: ACTION spug-list your_address

-- 
"Never confuse movement with action."
	--Ernest Hemingway

 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    POST TO: spug-list at pm.org        PROBLEMS: owner-spug-list at pm.org
 Seattle Perl Users Group (SPUG) Home Page: http://www.halcyon.com/spug/
 SUBSCRIBE/UNSUBSCRIBE: Replace ACTION below by subscribe or unsubscribe
        Email to majordomo at pm.org: ACTION spug-list your_address





More information about the spug-list mailing list