'threads' => [ 5.008, DEFAULT_OFF],
'imprecision' => [ 5.011, DEFAULT_OFF],
'experimental' => [ 5.017, {
- 'experimental:lexical_subs' =>
+ 'experimental::lexical_subs' =>
[ 5.017, DEFAULT_ON ],
}],
}
my ($ver, $rest) = @{ $v } ;
- if (ref $rest && $k ne 'experimental')
+ if (ref $rest)
{
my $bar = @keys ? "|" : " ";
print " -" . "-" x ($max - length $k ) . "+\n" ;
__END__
package warnings;
-our $VERSION = '1.14';
+our $VERSION = '1.15';
# Verify that we're called correctly so that warnings will work.
# see also strict.pm.
A number of functions are provided to assist module authors.
-In all the descriptions below, $category can also be a warnings category
-and ID separated by a colon, such as "experimental:lexical_subs". See
-L<perllexwarn/Individual Warning IDs>.
-
=over 4
=item use warnings::register