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