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: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |