Or if you prefer:

@hwall = sort { $average{$a} <=> $average{$b} } keys %average;

I noticed you enabled warnings with the -w switch, but don't forget to use strict as well. If you're having trouble making sense of the error messages, try use diagnostics.