Help for this page

Select Code to Download


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