foreach $hoge (@hoges) { s/$hoge//; } とか?