Help for this page

Select Code to Download


  1. or download this
    my $re = qr/"(.*?)" "(((\\")|[^"])*)"/;
my %fsr_hash;
while (<FSR>) {
    if (/$re/) { $fsr_hash{$1} = $2 }
}
  2. or download this
    use warnings;
use strict;
...

my $re = '"(.*?)" "(((\\")|[^"])*)"';
print YAPE::Regex::Explain->new($re)->explain;
  3. or download this
    The regular expression:

...
----------------------------------------------------------------------
)                        end of grouping
----------------------------------------------------------------------