in reply to aMe.sIa hi perl monks

Doesn't run for me:

Global symbol "$x" requires explicit package name at ./y line 8. Global symbol "$x" requires explicit package name at ./y line 8. Global symbol "$y" requires explicit package name at ./y line 8. Global symbol "$y" requires explicit package name at ./y line 9. Global symbol "$x" requires explicit package name at ./y line 9. Global symbol "$y" requires explicit package name at ./y line 9. Execution of ./y aborted due to compilation errors.

Running it without the use strict does work