From 3cea40506365b5db53f814869ac5cc420cd608fa Mon Sep 17 00:00:00 2001 From: Jay Hannah Date: Tue, 2 Apr 2013 12:37:40 -0500 Subject: [PATCH] Oh, oops. I was thinking 'use 5.12.1' did 'use warnings', but it only does 'use strict'. It's 'use Moose' which usually gives me 'use warnings', but ENOMOOSE :) --- ne.gov/go.pl | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) 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...";