Perlito5
view release on metacpan or search on metacpan
lib/Perlito5X/Test2/API.pm view on Meta::CPAN
}
# See gh #16
{
no warnings;
INIT { eval 'END { test2_set_is_end() }; 1' or die $@ }
}
BEGIN {
no warnings 'once';
if($] ge '5.014' || $ENV{T2_CHECK_DEPTH} || $Test2::API::DO_DEPTH_CHECK) {
*DO_DEPTH_CHECK = sub() { 1 };
}
else {
*DO_DEPTH_CHECK = sub() { 0 };
}
}
use Test2::Util::Trace();
use Test2::Hub::Subtest();
lib/Perlito5X/if.pm view on Meta::CPAN
If you C<use Text::Soundex> in Perl 5.18, for example,
and you have used L<warnings>,
then you'll get a warning message
(the deprecate module looks to see whether the
calling module was C<use>'d from a core library directory,
and if so, generates a warning),
unless you've installed a more recent version of L<Text::Soundex> from CPAN.
You can also specify to NOT use something:
no if $] ge 5.021_006, warnings => "locale";
This warning category was added in the specified Perl version (a development
release). Without the C<'if'>, trying to use it in an earlier release would
generate an unknown warning category error.
=head1 BUGS
The current implementation does not allow specification of the
required version of the module.
( run in 1.030 second using v1.01-cache-2.11-cpan-cc502c75498 )