Convert wacky date formats into ISO 8601 YYYY-MM-DD

isoize.pm

#!/usr/bin/env perl
use v5.12;
use Time::Piece;

sub isoize {
    # convert any wacky date formats to ISO 8601             
    my @dates;
    foreach (@_) {
        push @dates, Time::Piece->strptime($_, '%d %b %Y') if /\d+ \w+ \d{4}/;
        # other date formats here
    }
    return map { $_->strftime('%F') } @dates;
} 

main() unless caller();

sub main {
    # whatever, maybe parse command-line options
    undef;
}