Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
   grep { defined $_->[1] }
   map  { [ $_, m{$rxDate} ] }
   @dateStrs;

Select or download this

Oct 16 2004 11:09:19:943AM
Oct 16 2004 09:27:24:012PM
Jun 4 2005 03:13:45:508AM
Mar 3 2007 10:30:31:170PM