Did you search CPAN? You could use Date::Manip

use Date::Manip;

use strict;
use warnings;

my $date=ParseDate("16May07")
print UnixDate($date,"%m-%d-%Y");
[download]

Update: fixed date format string, thanks naikonta