Help for this page
$ perl -wE 'say "\*E"' *E
# ugly, but works: my $failmsg = "\\*E"; ... # if you want to quote regular expressions, do this: $failmsg = qr{\*E}; if ($_ =~ $failmsg) { ... }