Help for this page
package My::Debug; ... 1;
use My::Debug; ... debug('begin showing foovar', $foovar, 'end of foovar'); ... code ... }