Select Code to Download

#!/usr/bin/perl5.10 -w

...
  test1 => 'test1',
  test2 => 'test2'  
};

Reference found where even-sized list expected at ./test_warnings.pl l
+ine 3.
Reference found where even-sized list expected at ./test_warnings.pl l
+ine 15.