The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
# some forms of "use autouse ..."
use autouse TestA => qw(foo bar);
use autouse "TestB", qw(foo bar);

# "use if ..." (note the function call in COND)
sub frobnicate { 1 }
use if frobnicate(), TestC => qw(quux);