Select Code to Download

#! perl -w
use strict;
...


__END__

In addition, Perl defines the following:

...
    \pP Match P, named property.  Use \p{Prop} for longer names.

    \PP Match non-P

print "==$Config{installprefix}==\n";    # prints ==C:\Perl==

$podfileb =~ s!\\!/!g;
$rootb =~ s!\\!/!g;