Help for this page

Select Code to Download


  1. or download this
    my $regexp;

...
    # ... use the regexp, it has passed QC:
    &do_stuff() if( $testline =~ $regexp );
}
  2. or download this
    Regexp error with regexp '\s//': Search pattern not terminated at (eva
+l 2) line 1
  3. or download this
    if( eval "\$regexp = qr/$_/;" )
{
...
{
    warn "Regexp error with regexp '$_': $@";
}