use My::Debug;

debug_level( $opt_v );

sub foo_sub
{
    ... code ...
    debug('begin showing foovar', $foovar, 'end of foovar');
    ... code ...
}