in actual fact, change your line like this, and you should have what you want.

if($_=~m/([0-3]?[0-9(th)?(st)?(nd)?(rd)?]\s+(Jan(uary)?|Feb(ruary)?|Ma
+r(ch)?|Apr(il)?|May|Jun(e)?|Jul(y)?|Aug(ust)?|Sep(tember)?|Oct(ober)?
+|Nov(ember)?|Dec(ember)?)\s+[0-9]?[0-9]?[0-9][0-9])/ig){
            print "$file\t $1\n";
    }
[download]

And do the same for the other line.