Geometry: keys on hashref is fatal under perl 5.24 need to deref into a hash first (#4415)

lib/DDG/Goodie/Geometry.pm

@@ -1,13 +1,9 @@
 package DDG::Goodie::Geometry;
 # ABSTRACT: Write an abstract here
 
-# Start at http://docs.duckduckhack.com/walkthroughs/calculation.html if
-# you are new to instant answer development
-
 use DDG::Goodie;
 use strict;
 
-
 use YAML::XS 'LoadFile';
 use Data::Dumper;
 
@@ -38,7 +34,7 @@ handle remainder => sub {
 
     my %dataFormula;
     # Fill dataFormula with values for handlebar to parse
-    foreach my $key (keys $shape) {
+    foreach my $key (keys %{$shape}) {
 
        $dataFormula{$key} = {
             'nameCaps' => ucfirst($key),