Updated calls to keys($hashref) to keys(%{$hashref}) for compatability with perl < 5.14