From 3e4044ad5c82d43ec5b69bd016243600ae2c5599 Mon Sep 17 00:00:00 2001
From: Donovan Jones <donovan@catalyst.net.nz>
Date: Mon, 19 Apr 2010 16:17:10 +1200
Subject: [PATCH] Bug 2505 - use strict and warnings in sax_parser_test

---
 misc/sax_parser_test.pl | 12 ++++++++----
 1 file changed, 8 insertions(+), 4 deletions(-)

diff --git a/misc/sax_parser_test.pl b/misc/sax_parser_test.pl
index c99f07bad2..b2e597405c 100755
--- a/misc/sax_parser_test.pl
+++ b/misc/sax_parser_test.pl
@@ -1,13 +1,17 @@
 #!/usr/bin/perl
-#use strict;
-#use warnings; FIXME - Bug 2505
+
+use strict;
+use warnings;
+
 use XML::SAX;
+use Encode;
+
 my $parser = XML::SAX::ParserFactory->parser(
 Handler => MySAXHandler->new
 );
 binmode STDOUT, ":utf8";
-print "\x{65}\x{301}\n"; 
-use Encode; $parser->parse_string(encode_utf8("<xml>\x{65}\x{301}</xml>"));
+print "\x{65}\x{301}\n";
+$parser->parse_string(encode_utf8("<xml>\x{65}\x{301}</xml>"));
 $parser->parse_string("<xml>\xEF\xBB\xBF\x{65}\x{301}</xml>");
 
 package MySAXHandler;
-- 
2.39.5