http://www.perlmonks.org?node_id=55093

gryng has asked for the wisdom of the Perl Monks concerning the following question:

#!/usr/bin/perl -w use strict; eval 'no warnings' while (0==0);
The above code curiously eats memory like a fiend! I'm not sure if this is expected behavior or not, but it caught me as a surprise while writing a (slightly) more complex program that had the same 'no warnings' within an eval. I don't have a really intellegent guess as to why it would legitimately or illegitimately be doing this, so I'm just throwing this one out there. I've gotten around the problem in my program by removing the need for the 'no warnings'. (It should be noted that if warnings was not turned on initially the program will not thrash the memory). Ciao, Gryn p.s. Hi guys, long time, no code.