Re^2: How to catch SQL::Parser errors in Perl

in reply to Re: How to catch SQL::Parser errors in Perl
in thread How to catch SQL::Parser errors in Perl

Tried this but it still shows the Defaut msgs from Parser.pm : Incomplete SET clause! at ./post_fjs_audit.pl line 173

  +173      my $result = eval { $parser->parse($statement) };
  +174      unless($result) {
  +175          print "Caught!\n";
  +177      }
[download]


Incomplete SET clause! at ./post_fjs_audit.pl line 173
Caught!
[download]

Any way to suppress these default msgs from Parser.pm ? One more problem is that the program exits on the caught exception. What if there are statements below to process. I dont want the program to exit.

Comment on Re^2: How to catch SQL::Parser errors in Perl Select or Download Code

In Section Seekers of Perl Wisdom