or download this
lanx@nc10-ubuntu:~$ perl -e 'use strict; local $x=4; print $x'
Global symbol "$x" requires explicit package name at -e line 1.
...
Execution of -e aborted due to compilation errors.
lanx@nc10-ubuntu:~$ perl -e 'use strict; our $x=4; print $x'
4lanx@nc10-ubuntu:~$