Update depreciated 'keys' syntax to perl 5.26

brinkmanlab · Jan 10, 2019 · 34aad6c · 34aad6c · innovate-invent · Jan 10, 2019
1 parent fe029ce
commit 34aad6c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Dimob/Config.pm b/lib/Dimob/Config.pm
@@ -77,7 +77,7 @@ sub evaluate_parameters {
 
     my $config = $self->config;
 
-    for my $param (keys $config) {
+    for my $param (keys %{$config}) {
 	if($config->{$param} =~ /\{\{.+\}\}/) {
 	    $config->{$param} =~ s/\{\{([\w_]+)\}\}/$config->{$1}/eg;