Re^2: Quick search-and-replace month names for numbers

Good, but it's possible to do it even simpler.

perl -we 'use Date::Manip; for (@ARGV) { print UnixDate($_ . "/15","%m
+\n") || "?\n"; }' january Dec 3 Apr MAY xJun
[download]

Output:

01
12
03
04
05
?
[download]

Comment on Re^2: Quick search-and-replace month names for numbers Select or Download Code