Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use strict;
...
0) (?^x:^ " (?: [^"\\]++ |     \\. )*+     " ) ==> NOT MATCHED!
1) (?^x:^ " (?: [^"\\]++ | (?: \\. )++ )*+ " ) ==> MATCHED!
2) (?^x:^ " (?: [^"\\]+  | (?: \\. )+  )*+ " ) ==> MATCHED!
  2. or download this
    perl -v

...
(with 58 registered patches, see perl -V for more detail)

Copyright 1987-2015, Larry Wall