$date =~ s!0?(\d+)/0?(\d+)!$1/$2!;

##</code><code>##

$date =~ s!0?(\d+/)!$1!g;