Welcome to the Monastery, PaulB-Liverpool.

In addition to the good replies you have already received, I will suggest that $baverage1 is not a great name for that variable. It seems to contain the number of dismissals and not an average of any kind whatsoever. Perhaps $dismissals or even the concise $outs would be better.

And, in case you were unaware, you do not need all those single quotes inside the hash keys.