在Perl中，可以使用正則表達式和替換函數來替換字符串中的字符。
下面是一個示例代碼，用于將字符串中的字符"a"替換為"b"：
my $str = "abcde";
$str =~ s/a/b/g;
print $str;
輸出結果為"bbcde"。
在上面的代碼中，使用了=~運算符將字符串連接到正則表達式，使用s/a/b/g來替換字符串中的字符。其中，s表示替換操作，a表示要替換的字符，b表示替換后的字符，g表示全局替換，即替換字符串中所有匹配的字符。
如果要替換多個字符，可以使用正則表達式的字符類。例如，下面的代碼將字符串中的所有小寫字母替換為大寫字母：
my $str = "abcde";
$str =~ s/[a-z]/\U$&/g;
print $str;
輸出結果為"ABCDE"。
在上面的代碼中，使用了字符類[a-z]來匹配所有小寫字母，\U$&表示將匹配的字符轉換為大寫。
