$var = "Affe, Baum, Chili";
$var =~ tr/ABC/XYZ/;