in reply to How to convert date like: 19 Aug 12:00 PM EDT to a perl structure

You could also just "roll your own" with a few lines of code. Make a hash where the three-letter abbreviation for each month is the key, and the value is its numerical equivalent. Then...
print "$months{$2}/$1/2015" if $ugly_date =~ /([0-3]?[[0-9]) (Jan|Feb|Mar|Apr|May|Jun|Jul|Aug|Sep|Oct|Nov|Dec) .*/ # Returns 8/19/2015>
Though you'd probably want to set a $current_year variable with a call to your system
  • Comment on Re: How to convert date like: 19 Aug 12:00 PM EDT to a perl structure
  • Download Code