Help for this page

Select Code to Download


  1. or download this
    use YAPE::Regex::Explain;
my $pattern='(\n\s*[0-9]{1,3}\s*\n\s*<page>\s*\n|\n\s*-[0-9]{1,3}-\s*\
+n\s*<page>\s*\n|\n\s*[A-Za-z]-[0-9]{1,3}\s*\n\s*<page>\s*\n|\n\s*page
+\s*[0-9]{1,3}\s*of\s*[0-9]{1,3}\s*\n)';

print YAPE::Regex::Explain->new($pattern)->explain;
  2. or download this
    The regular expression:

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