$date = '2003-08-01';
$newdate = join('', ($date =~ /(\d\d)/g)[2, 3, 1]);