qwurx [shmem] ~> perl -MDate::Parse -le 'print str2time pop' '19 Aug 12:00 PM EDT'
1440000000
qwurx [shmem] ~> perl -MDate::Parse -le 'print scalar localtime str2time pop' '19 Aug 12:00 PM EDT'
Wed Aug 19 18:00:00 2015

##</code><code>##

qwurx [shmem] ~> perl -MData::Dumper -MDate::Parse -le '@hash{qw(sec min hour mday mon year wday yday isdst)} = localtime str2time pop;print Data::Dumper->Dump([\%hash],[qw(timehash)])' '19 Aug 12:00 PM EDT'
$timehash = {
              'isdst' => 1,
              'min' => 0,
              'yday' => 230,
              'mon' => 7,
              'year' => '115',
              'sec' => 0,
              'wday' => 3,
              'hour' => 18,
              'mday' => 19
            };