在Perl中，可以使用正則表達式和替換操作符（s///）來替換多個字符串。
以下是替換多個字符串的一種常見方法：
my $string = "Hello world, Perl is awesome!";
$string =~ s/world/World/g;
$string =~ s/Perl/Python/g;
print $string; # 輸出：Hello World, Python is awesome!
在上述示例中，使用正則表達式替換操作符（s///）將字符串中的 “world” 替換為 “World”，將 “Perl” 替換為 “Python”。最后輸出替換后的字符串。
my $string = "Hello world, Perl is awesome!";
my %replace = (
'world' => 'World',
'Perl' => 'Python'
);
$string =~ s/$_/$replace{$_}/g for keys %replace;
print $string; # 輸出：Hello World, Python is awesome!
在上述示例中，使用哈希表 %replace 存儲需要替換的字符串和替換后的字符串。然后使用循環遍歷哈希表的鍵，通過正則表達式替換操作符將字符串中的鍵替換為對應的值。
這兩種方法都可以實現替換多個字符串，具體使用哪種方法取決于你的需求和個人偏好。
