Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...
        printf "%10s => No match\n", $date;
    }
}

Select or download this

01/02/2006 => (01, 02, 2006) => (01, 02, 2006)
  1/2/2006 => ( 1,  2, 2006) => (01, 02, 2006)
...
 13/1/2006 => No match
 2/35/2006 => No match
    1/2/06 => No match