Re: Eval Errors

[WC -Sx- Jones]

James Edward Gray II wrote:

eval() shouldn't be squawking there, as I understand it.  Those look 
like die() statements to me too, yet the program keeps running.  Hmm.


I dont know - I believe we are missing something basic prolly:

# My Version -

 #!/usr/bin/perl

 use strict;
 use warnings;
 my @strings = ( q(my $bad_syntax = ;),
                 q('a poorly 'nested' string'),
                 q('a poorly 'nested::test' string') );
 foreach (@strings) {
        print "\nCode:  $_\n";
        print "\nDisabling warnings...\n";
        no warnings;
        print "Calling eval()...\n";
        eval;
        print "eval() complete.\n\n";
        print "Handling error...\n";
        print "Caught error:  $@";
 }
 __END__

All I can say is while "no warnings" are in effect Perl trys to

"Do The Right Thing"

In this instance it wants to live.
-Sx-
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>