What happens here? The use strict is invisible to the Code::Police, and so tpircs ym yfisdrawkcab yeht.#!/usr/bin/perl -w use SomeModule;use strict; use Code::Police; foo(); chomp, bar; something_else;
Now, what if I do this?
The Code::Police then see a strict where there isn't one, and let the script pass through unharmed. The original way of detecting strict I think is probably better.#!/usr/bin/perl -w use Code::Police; BEGIN { eval '#' . <<''; use strict; }
In reply to Re: Re: Code::Police
by premchai21
in thread Code::Police
by Ovid
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |