Declared multiple variables in one line.

hknutzen · Feb 28, 2017 · aea405c · aea405c
1 parent 435fbc8
commit aea405c
Showing 1 changed file with 1 addition and 3 deletions.
diff --git a/lib/Netspoc/Compiler/Pass1.pm b/lib/Netspoc/Compiler/Pass1.pm
@@ -6958,9 +6958,7 @@ sub split_rules_by_path {
 
         # Group has elements from different zones and must be split.
         if (grep { $path0 ne ($obj2path{$_} || get_path($_)) } @$group) {
-            my %seen;
-            my @path_list;
-            my %path2group;
+            my (%seen, @path_list, %path2group);
             for my $element (@$group) {
                 my $path = $obj2path{$element};
                 $seen{$path}++ or push @path_list, $path;