or download this
#!/usr/bin/env perl
use 5.010_000;
use strict;
...
><
Name "MyTest::global" used only once: possible typo at /Users/io1/Work
+space/example/package_variables.pl line 16.
Use of uninitialized value $_ in concatenation (.) or string at /Users
+/io1/Workspace/example/package_variables.pl line 18.