C:\dev\LOOSE>cat s eval " print 1; INIT { print 2 } END { print 3 } BEGIN { print 4 } CHECK { print 5 } "; print "out of eval $@"; C:\dev\LOOSE>perl -Wl s Too late to run INIT block at (eval 1) line 3. 4 Too late to run CHECK block at (eval 1) line 6. 1 out of eval 3
In reply to use warnings;
by PodMaster
in thread eval() and INIT{}
by powerman
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |