How about:

my @dates = (qw/092205 092305 092605/);
my @newdates;

foreach my $date (@dates) {
    my ($month,$day,$year) = ($date =~ /(\d\d)(\d\d)(\d\d)/);
    push @newdates,join('/',$month,$day,$year);
}
[download]

Of course, you can do any particular manipulation of $month,$day,$year that you like, such as changing $year to its 4-digit equivalent, etc.

Sean