$stamp =~ s/.{3}(.{6}).{5}/$1/gosix; #strips first day/year chars $stamp =~ s/://gosix; #strips the colon