in reply to How do I cut single characters out of a string

The substitution operator can remove a character: 
use warnings;
use strict;

my $string = "mystring123456";
$string =~ s/1//;
print "$string\n";

__END__

mystring23456

[download]

In Section Seekers of Perl Wisdom