#!/app/perl-5.8/bin/perl

my $string = "ERROR blah license will expire";
print `/app/perl-5.8/bin/perl -version` . "\n\n";
if ( $string =~ /(ERROR.*?(?!(Error processing Cancel Execution|license will expire)))/ ){
  print "MATCHED\n";
} else {
  print "NOT MATCHED\n";
}