diff --git a/ne.gov/go.pl b/ne.gov/go.pl index 4d7e711..dce080c 100644 --- a/ne.gov/go.pl +++ b/ne.gov/go.pl @@ -3,6 +3,7 @@ # Repo: https://github.com/jhannah/sandbox/tree/master/ne.gov use 5.12.1; +use warnings; # since there's no use Moose; in here (weird, right? ;) use XML::Twig; use GraphViz2; @@ -23,15 +24,15 @@ $twig->parsefile($file); my $root = $twig->root; # ------------------------------------------ -my $file = "$dir/serverQueuemap.xml"; +$file = "$dir/serverQueuemap.xml"; say "Parsing $file..."; -my $twig = XML::Twig->new( +$twig = XML::Twig->new( twig_handlers => { workerQueue => \&process_worker_queue, }, ); $twig->parsefile($file); -my $root = $twig->root; +$root = $twig->root; # ------------------------------------------ $file = "map.png"; say "Writing $file...";