foreach $in (@in) { $db =~ s/$in/g; }