How to change letter on some position in the string?

[Guest]

How to change letter on some position in the string?

eg.
$word="This is my test string."

Change letter on 7 nth position to "X"

$word="This iX my test string."

Or change letter on 15 nth position to "?"

$word="This is my tes? string."

Thanks.

 

[John W. Krahn]

How to change letter on some position in the string?

eg.
$word="This is my test string."

Change letter on 7 nth position to "X"

$word="This iX my test string."

$ perl -le'
my $word = "This is my test string.";
print $word;
substr $word, 6, 1, "X";
print $word;
'
This is my test string.
This iX my test string.

Or change letter on 15 nth position to "?"

$word="This is my tes? string."

$ perl -le'
my $word = "This is my test string.";
print $word;
substr $word, 14, 1, "?";
print $word;
'
This is my test string.
This is my tes? string.




John