Re: documentation/789: Bad Perl Code is mentioned in the FAQ, #31

[Rodent of Unusual Size]

>From the fingers of Dean Gaudet flowed the following:
>
>But $0 == "nph-foobar.cgi" is a theoretical possibility. 

    Yes indeed - which is successfully matches by m:^(.*/)*nph-[^/]*$:
    as expected.

    The RE matches if

     o "nph-" appears either at the beginning of the string or
       immediately following a "/", AND
     o no "/"s occur following the "nph-" string

    This allows "nph-foo.cgi", "bar/nph-bag.cgi", and "/root/nph-bletch.cgi"
    to work, but prevents "bogus-nph-script" and "/dir/path/nph-sub/x.cgi"
    from being treated as NPH scripts.

    #ken    :-)}