use strict;
use warnings;
use Testing qw(:config);

print "I am ", $verbose ? "" : "not ", "verbose\n";
print "I should ", $debug ? "" : "not ", "debug\n";