>perl build_parser.pl

>perl test.pl
Unparsed: hap -b
Parsed:   ["hap",[["-b",1]]]
Deparsed: hap -b 1

Unparsed: hap -b sknxharvest01
Parsed:   ["hap",[["-b","sknxharvest01"]]]
Deparsed: hap -b sknxharvest01

Unparsed: hap -b sknxharvest01 -enc testfile.dfo
Bad data: hap -b sknxharvest01 -enc testfile.dfo

Unparsed: hap -b sknxharvest01 -usr cgowing -pass chaspass
Parsed:   ["hap",[["-b","sknxharvest01"],["-usr","cgowing"],["-pass","chaspass"]]]
Deparsed: hap -b sknxharvest01 -usr cgowing -pass chaspass

Unparsed: hap -badflag
Parsed:   ["hap",[["-badflag",1]]]
Deparsed: hap -badflag 1

Unparsed: hap -prompt
Parsed:   ["hap",[["-prompt",1]]]
Deparsed: hap -prompt 1

Unparsed: hap -b sknxharvest01 -prompt
Parsed:   ["hap",[["-b","sknxharvest01"],["-prompt",1]]]
Deparsed: hap -b sknxharvest01 -prompt 1

Unparsed: hap -prompt -b sknxharvest01
Parsed:   ["hap",[["-prompt",1],["-b","sknxharvest01"]]]
Deparsed: hap -prompt 1 -b sknxharvest01