訂正
if $hoge =~ /(hoge|fuga|foo|bar)/
にしてくらさい