Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Answer: Convert month name to number

( #95459=categorized answer: print w/ replies, xml ) Need Help??

Q&A > dates and times > Convert month name to number contributed by japhy

You want a hash.
%mon2num = qw( jan 1 feb 2 mar 3 apr 4 may 5 jun 6 jul 7 aug 8 sep 9 oct 10 nov 11 dec 12 ); print $mon2num{ lc substr($month, 0, 3) };
That works for "JANUARY", "Mar", "decemb.", "oct", and many other variants.

Comment on Answer: Convert month name to number
Download Code
Replies are listed 'Best First'.
Re: Answer: Convert month name to number
by RhetTbull (Curate) on Jul 11, 2001 at 00:56 UTC
    Great implementation japhy! A word of warning to the wise that if you plan on using this with POSIX mktime and friends you'll want to subtract 1 from the month number (e.g. January = 0, December = 11).
Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (15)
As of 2015-07-28 19:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (258 votes), past polls