$ perl -E '$var1 = "10/02/2009"; ($var2 = $var1) =~ s{/}{}g; say $var2'
10022009