use strict;
use warnings;

my $VERBOSE;
BEGIN {$VERBOSE=1 }

use if $VERBOSE, feature => "say";

say "bla";

##</code><code>##

use strict;
use warnings;

sub VERBOSE { int rand 2}

use if VERBOSE, feature => "say";

say "bla";