Help for this page

Select Code to Download

Select or download this

d:\exp>perl -MO=Deparse,-p -e"if (! $args =~ /\-rs(\s+)(\S+)/ && ! $ar
+gs =~ /\-p(\s+)(\S+)/ && ! $args =~ /\-P(\s+)(\S+)/){1}"

...
    '???';
}
-e syntax OK