こんなコードってもっと簡単にできると思うんですが、
どういう風に書いたらいいですか？

if ($value eq "hoge") {
forearch (@hogehoge){
ながーーい処理
}
} elsif ($value eq "foo") {
forearch (@foofoo) {
上のと同じ処理
}
}