Select Code to Download

my $DDMMYYYY = '16/06/2003';
my $YYYYMMDD = substr($DDMMYYYY, 6, 4) .
               substr($DDMMYYYY, 3, 2) . 
               substr($DDMMYYYY, 0, 2);