#! perl -slw package MyPackage; ... return 1 if caller; package main; use Devel::StealthDebug; our $ITERS ||= 10; our $OTHER ||= 'default'; ## run test code here