my $string = 'nameAATTCC0'; $string =~ s/([ATC0])/ $1/g; print $string;