comp_unit statementlist statement statement_control statement_control__S_002use usecomp_unit statementlist statement statement_control statement_control__S_002use ws comp_unit statementlist statement statement_control statement_control__S_002use version version__S_040v vcomp_unit statementlist statement statement_control statement_control__S_002use version version__S_040v vnum 6comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist ws unv comment comment__S_058Sharp comp_unit statementlist ws vws
comp_unit statementlist statement statement_control statement_control__S_002use usecomp_unit statementlist statement statement_control statement_control__S_002use ws comp_unit statementlist statement statement_control statement_control__S_002use module_name module_name__S_039normal longname name identifier ident Testcomp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist statement EXPR termish term term__S_332identifier identifier ident plancomp_unit statementlist statement EXPR termish term term__S_332identifier args ws comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR termish term term__S_086value value value__S_136number number integer decint 1comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist statement EXPR INFIX termish term term__S_079scope_declarator scope_declarator scope_declarator__S_041my mycomp_unit statementlist statement EXPR INFIX termish term term__S_079scope_declarator scope_declarator scope_declarator__S_041my scoped ws comp_unit statementlist statement EXPR INFIX termish term term__S_079scope_declarator scope_declarator scope_declarator__S_041my scoped declarator variable_declarator variable sigil sigil__S_036Dollar sigil sigil__S_036Dollar sigil sigil__S_036Dollar $comp_unit statementlist statement EXPR INFIX termish term term__S_079scope_declarator scope_declarator scope_declarator__S_041my scoped declarator variable_declarator variable desigilname longname name identifier ident xcomp_unit statementlist statement EXPR INFIX termish term term__S_079scope_declarator scope_declarator scope_declarator__S_041my scoped declarator variable_declarator ws comp_unit statementlist statement EXPR INFIX infixish infix infix__S_316Equal =comp_unit statementlist statement EXPR INFIX ws comp_unit statementlist statement EXPR INFIX termish term term__S_086value value value__S_136number number integer decint 0comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist statement EXPR termish term term__S_332identifier identifier ident evalcomp_unit statementlist statement EXPR termish term term__S_332identifier args ws comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single nibbler END { $x = 1 }; die "fatal";comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single 'comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist statement EXPR termish term term__S_332identifier identifier ident iscomp_unit statementlist statement EXPR termish term term__S_332identifier args ws comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST termish term term__S_077variable variable sigil sigil__S_036Dollar sigil sigil__S_036Dollar sigil sigil__S_036Dollar $comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST termish term term__S_077variable variable desigilname longname name identifier ident xcomp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST infixish infix infix__S_323Comma ,comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST ws comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST nulltermish termish term term__S_086value value value__S_136number number integer decint 1comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST infixish infix infix__S_323Comma ,comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST ws comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST nulltermish termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single 'comp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST nulltermish termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single nibbler die() does not prevent END block from being runcomp_unit statementlist statement EXPR termish term term__S_332identifier args arglist EXPR LIST nulltermish termish term term__S_086value value value__S_135quote quote quote__S_049Single_Single 'comp_unit statementlist eat_terminator ;comp_unit statementlist ws vws
comp_unit statementlist ws unv comment comment__S_058Sharp