When looking for 'use' declarations in a directory full of perl scripts do NOT 
absentmindedly use the same extension for your output file

find ./ -name \*.pl | xargs grep 'use ' > perlmodules.pl

I stopped it before it consumed all free space on the drive, which is a good 
thing, because it's our production web and database server...it had run for 
about 15 minutes when I noticed.

It was busy filling perlmodules.pl with ever-growing regressed references to 
every 'use' declaration in perlmodules.pl; basically adding them on the end as 
fast as it found them at the top, and perlmodules.pl was growing exponentially.

Here is a sample after the script had run for about 20 seconds:

./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./perlmodules.pl:./apply/apply-dropdownmenus.pl:#
 the year it actually refers to. Could use admityear from

It was up to 107 mb at this point....

LFMF.

-- 
Bruce Johnson
University of Arizona
College of Pharmacy
Information Technology Group

Institutions do not have opinions, merely customs


-- 
You received this message because you are subscribed to the Google Groups 
"StrataList-OT" group.
To post to this group, send email to [email protected].
To unsubscribe from this group, send email to 
[email protected].
For more options, visit this group at 
http://groups.google.com/group/stratalist-ot?hl=en.

Reply via email to