From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

#!perl
BEGIN {
unless ($ENV{RELEASE_TESTING}) {
print qq{1..0 # SKIP these tests are for release candidate testing\n};
exit
}
}
use Test::More 0.96 tests => 1;
eval { require Test::Vars };
SKIP: {
skip 1 => 'Test::Vars required for testing for unused vars'
if $@;
Test::Vars->import;
subtest 'unused vars' => sub {
all_vars_ok();
};
};