Beefy Boxes and Bandwidth Generously Provided by pair Networks
No such thing as a small change
 
PerlMonks  

Re: scope of "use strict"? (needed: "superstrict")

by leriksen (Curate)
on Jul 07, 2005 at 12:59 UTC ( #473082=note: print w/ replies, xml ) Need Help??


in reply to scope of "use strict"? (needed: "superstrict")

Maybe the easiest solution is to copy the modules to an area where you can edit them, then use something like

find . -name \*\.pm -exec perl -i -ne 'if (/^package/) {print $_ . "use strict\n;"} else  {print}' {} \;

which searches for .pm files in the current directory and down (and which is where you copied them), looking for the 'package XXX;' lines and replacing them with

package Foo; use strict;

It assumes that the 'package Foo;' lines have no leading spaces - adjust if necessary...

then you can run code that loads the modules and see what pops out, making sure to run the code as

perl -I<path to root of strict versions> nameOfScript.pl

good luck!

...it is better to be approximately right than precisely wrong. - Warren Buffet


Comment on Re: scope of "use strict"? (needed: "superstrict")
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://473082]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (15)
As of 2015-07-07 20:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (93 votes), past polls