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