for my $i (0..$#array) { $array[$i] =~ s/x//g; } #### foreach (@array) { s/x//g; } #### s/x//g foreach @array;