一括文字列変換

質問

$FORM{'color'}
$FORM{'background'}
$FORM{'name'}
$FORM{'title'}
$FORM{'comment'}
上記に文字列（例）「a」が入力された場合に「b」に変換したいのですが、一括で変換する場合は
$val =~ s/a/b/g;
とすればできます。

ただ、$FORM{'comment'}と$FORM{'title'}には変換を反映させたくないのですが、この場合はどのようにすればいいのでしょうか？
$FORM{'color'} =~ s/a/b/g;
$FORM{'background'} =~ s/a/b/g;
$FORM{'name'} =~ s/a/b/g;
と一つ一つ設定するしかないのでしょうか？変換したい文字列が莫大にありますので、出来れば一括でできれば助かります。よろしくお願いいたします。

回答No.1

Tacosan · ベストアンサー

変換するものとしないものの区別がよくわかりませんが, 例えば
my @convert_keys = qw(color background name);
for my $key (@convert_keys) {
$FORM{$key} =~ s/a/b/g;
}
なんてのではダメ?

お礼

有難うございます。おかげ様でまとめて変換することができました。