Select Code to Download

C:\chas_sandbox\pwgen>
copy con randfromtwo.pl
...
randfromtwo.pl
3c2
C:\chas_sandbox\pwgen>

C:\chas_sandbox>
perl -Mdiagnostics -le "sub doit{$ref=$_;${$ref} = 'nope'};$str='cwh';
+print $str
...
cwh

C:\chas_sandbox>

C:\chas_sandbox>
perl -Mdiagnostics -le "sub doit{$ref=$_;\\$ref = 'nope'};$str='cwh';p
+rint $str;doit($str);print$str"
...
 at -e line 1

C:\chas_sandbox>

#/usr/bin/perl -Wl

...
        print Dumper($reresult);
    }else{ print "  badstring\n"}
}

startrule: commandline{$item{commandline}}
commandline: command options {[$item {command},$item{options}]}
...
option: optionflag optionvalue { [$item{optionflag}, $item{optionvalue
+}?$item{optionvalue}:1] }
optionflag: /(-\w+)/ { $1 }
optionvalue: /(\w*)/ { $1 }

hap -b
hap -b sknxharvest01
...
hap -prompt
hap -b sknxharvest01 -prompt
hap -prompt -b sknxharvest01