X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2Fstrictures.pm;h=5bd43eca507396b5a32a9a00c5ca92a62874ec2c;hb=1e139b49372a4dbd05942d512dc12e68e708eade;hp=7392eb5143df23b2747b1885cdfab28840d034ab;hpb=40836ccc2008e98d13324aa9416bb375af6c6cef;p=p5sagit%2Fstrictures.git diff --git a/lib/strictures.pm b/lib/strictures.pm index 7392eb5..5bd43ec 100644 --- a/lib/strictures.pm +++ b/lib/strictures.pm @@ -16,12 +16,16 @@ our @WARNING_CATEGORIES = grep { exists $warnings::Offsets{$_} } qw( exiting experimental experimental::autoderef + experimental::const_attr experimental::lexical_subs experimental::lexical_topic experimental::postderef + experimental::re_strict + experimental::refaliasing experimental::regex_sets experimental::signatures experimental::smartmatch + experimental::win32_perlio glob imprecision io @@ -32,7 +36,9 @@ our @WARNING_CATEGORIES = grep { exists $warnings::Offsets{$_} } qw( pipe syscalls unopened + locale misc + missing numeric once overflow @@ -40,6 +46,7 @@ our @WARNING_CATEGORIES = grep { exists $warnings::Offsets{$_} } qw( portable recursion redefine + redundant regexp severe debugging @@ -70,6 +77,7 @@ our @WARNING_CATEGORIES = grep { exists $warnings::Offsets{$_} } qw( nonchar surrogate void + void_unusual y2k );