perl -MDate::Format -MDate::Parse -e '
  print time2str("%a %h %e %Y, %r %Z", 
        str2time("Wed Feb 18 2004, 11:03:45 AM EST")), $/;'