>>102
while (<FH>) {...}を抜けた直後は$_はundefになってる筈なので、
そこで

if(5<$count{$_}){$bg="orange";}

などとやっても意味がない。

直し方としては、どれか一つでも5を超えたら全部色をかえたいのか
5を超えたやつだけ色を変えたいのかで違ってくるが、説明が不明瞭
なのでなんともいえんな。