| Subject: | attempt to detect and skip pod directives fails - leads to false negatives |
This line:
next if (/^\s*=.+/ .. (/^\s*=(cut|back|end)/ || eof($fh)));
is way too relaxed -- for example it matches this line, making the function think every line thereafter is pod and not to be checked:
= Moose::Util::TypeConstraints::find_or_create_isa_type_constraint(
I would suggest simply removing this attempt to detect and skip pod, since it isn't documented behaviour anyway.
(Feel like giving me comaint? I can address this and the other tickets in the queue.)