for (keys %usage) { print "$_ = $usage{$_}\n" }