I've managed to successfully avoid learning Perl for a while now... my reaction, while not quite so dramatic as yours, was that it made my head hurt to try to understand it! :)
--- Robert Freeman <[EMAIL PROTECTED]> wrote: > unix time conversion functionCary.... I once thought I wanted to do > some > Perl coding... So I bought a book and started to play with it. It > made my > head bleed... literally I had little droplets of blood emerging from > my > head.... They rushed me to the hospital and put me in the Perl ward > where I > languished for days on IV's of Mountain Dew and pulverized Ritz > crackers..... it was close. > > In my mind there is nothing obvious about Perl, this coming from and > old C > coder who did pointers and linked lists in his sleep years ago. I > don't > know, maybe I was having a bad day and it's time to get my "learning > Perl" > book out again.... > > Anyone else feel that way about Perl or am I a lone wolf in a Perl > world? > > RF > -----Original Message----- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of Cary > Millsap > Sent: Friday, January 24, 2003 4:29 PM > To: Multiple recipients of list ORACLE-L > Subject: RE: unix time conversion function > > > At the risk of stating the obvious, doing it in Perl looks like > this: > > > > #!/usr/bin/perl > > use Date::Format qw(time2str); > > my $t = 1043447100; # for example > > print time2str("%T %A %d %B %Y", $t), "\n"; > > > > Cary Millsap > Hotsos Enterprises, Ltd. > http://www.hotsos.com > > Upcoming events: > - 2003 Hotsos Symposium on OracleR System Performance, Feb 9-12 > Dallas > - RMOUG Training Days 2003, Mar 5-6 Denver > - Hotsos Clinic 101, Mar 26-28 London > > -----Original Message----- > From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]] On Behalf Of Post, > Ethan > Sent: Friday, January 24, 2003 3:30 PM > To: Multiple recipients of list ORACLE-L > Subject: RE: unix time conversion function > > > > Kinda...you can change the year to 1970 if you want, this also > converts to > minutes, not seconds. It is a really ugly function but it seems to > work. > You could always use perl. > > > > function f_minutes { > # Funky function I use to calculate the number of minutes since > 2000 > MIN_YEAR=$( date +"%Y" ) > MIN_YEAR=$( expr ${MIN_YEAR} - 2000 ) > MIN_YEAR=$( expr ${MIN_YEAR} \* 525600 ) > MIN_DAYS=$( date +"%j" ) > MIN_DAYS=$( expr "${MIN_DAYS}" - 1 ) > MIN_DAYS=$( expr "${MIN_DAYS}" \* 1440 ) > MIN_HOURS=$( date +"%H" ) > MIN_HOURS=$( expr "${MIN_HOURS}" \* 60 ) > MIN_MINS=$( date +"%M" ) > MIN_TOTAL=$(( ${MIN_YEAR} + ${MIN_DAYS} + ${MIN_HOURS} + > ${MIN_MINS} )) > print ${MIN_TOTAL} > } > > -----Original Message----- > From: Adams, Matthew (GECP, MABG, 088130) > [mailto:[EMAIL PROTECTED]] > Sent: Friday, January 24, 2003 1:14 PM > To: Multiple recipients of list ORACLE-L > Subject: unix time conversion function > > Anybody got a handy little function to > convert a standard unix seconds-since-Jan-1970 epoch > time (stored as a number) to a readable date? > > It would save me a lot of time not having to re-invent the > wheel. > > Matt > > ---- > Matt Adams - GE Appliances - [EMAIL PROTECTED] > My computer beat me at chess, but I won > when it came to kick boxing. > __________________________________________________ Do you Yahoo!? Yahoo! Mail Plus - Powerful. Affordable. Sign up now. http://mailplus.yahoo.com -- Please see the official ORACLE-L FAQ: http://www.orafaq.net -- Author: Rachel Carmichael INET: [EMAIL PROTECTED] Fat City Network Services -- 858-538-5051 http://www.fatcity.com San Diego, California -- Mailing list and web hosting services --------------------------------------------------------------------- To REMOVE yourself from this mailing list, send an E-Mail message to: [EMAIL PROTECTED] (note EXACT spelling of 'ListGuru') and in the message BODY, include a line containing: UNSUB ORACLE-L (or the name of mailing list you want to be removed from). You may also send the HELP command for other information (like subscribing).
