(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:ACCT) op:Equal rhs:{(acct)} spids:[13])]
      spids: [13]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:RESULTS)
          op: Equal
          rhs: 
            {(acct.) 
              (CommandSubPart
                command_list: (CommandList children:[(C {(uname)} {(-m)})])
                left_token: <Left_Backtick '`'>
                spids: [18 22]
              ) (.tar.gz)
            }
          spids: [16]
        )
      ]
      spids: [16]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:TMPDIR)
          op: Equal
          rhs: {($ VSub_Dollar '$$') (.tmp)}
          spids: [25]
        )
      ]
      spids: [25]
    )
    (Sentence
      child: 
        (Assignment
          keyword: Assign_None
          pairs: [(assign_pair lhs:(LhsName name:TZ) op:Equal rhs:{(UTC)} spids:[29])]
          spids: [29]
        )
      terminator: <Op_Semi ';'>
    )
    (C {(export)} {(TZ)})
    (FuncDef
      name: run
      body: 
        (BraceGroup
          children: [
            (C {(/usr/bin/time)} {(-l)} {(-o)} {($ VSub_Number '$1') (.time)} {(DQ ($ VSub_At '$@'))})
          ]
          spids: [42]
        )
      spids: [38 41]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: 
                (C {(Lit_Other '[')} 
                  {
                    (CommandSubPart
                      command_list: (CommandList children:[(C {(whoami)})])
                      left_token: <Left_Backtick '`'>
                      spids: [65 67]
                    )
                  } {(KW_Bang '!') (Lit_Other '=')} {(DQ (root))} {(Lit_Other ']')}
                )
              terminator: <Op_Semi ';'>
            )
          ]
          action: [(C {(echo)} {(DQ ('You need to be root to run this test.'))}) (C {(exit)} {(1)})]
          spids: [-1 79]
        )
      ]
      spids: [-1 93]
    )
    (C {(echo)} {(Redirecting)} {(accounting.)})
    (C {(mkdir)} {($ VSub_Name '$TMPDIR')})
    (C {(cd)} {($ VSub_Name '$TMPDIR')})
    (SimpleCommand
      words: [{(Lit_Other ':')}]
      redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{($ VSub_Name '$ACCT')} spids:[113])]
    )
    (C {(accton)} {($ VSub_Name '$ACCT')})
    (C {(echo)} {(Running)} {(commands.)} {(This)} {(should)} {(not)} {(take)} {(more)} {(than)} {(30s.)})
    (C {(run)} {(awk)} {(SQ <'BEGIN {for (i = 0; i < 1000000; i++) cos(.3)}'>)} {(/dev/null)})
    (C {(run)} {(egrep)} {(SQ <'(.)(.)(.)(.)(.)(.)(.)(.)(.)\\9\\8\\7\\6\\5\\4\\3\\2\\1'>)} 
      {(/usr/share/dict/words)}
    )
    (C {(run)} {(find)} {(/usr/src)} {(-name)} {(xyzzy)})
    (C {(run)} {(sleep)} {(3)})
    (SimpleCommand
      words: [
        {(run)}
        {(dd)}
        {(Lit_VarLike 'if=') (/dev/zero)}
        {(Lit_VarLike 'bs=') (512)}
        {(Lit_VarLike 'count=') (4096)}
        {(Lit_VarLike 'of=') (zero)}
      ]
      redirects: [(Redir op_id:Redir_Great fd:2 arg_word:{(/dev/null)} spids:[209])]
    )
    (SimpleCommand
      words: [{(run)} {(diff)} {(/usr/share/dict/words)} {(/dev/null)}]
      redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(/dev/null)} spids:[224])]
    )
    (C {(ln)} {(/usr/bin/true)} {(123456789012345)})
    (C {(run)} {(./123456789012345)})
    (C {(ln)} {(/usr/bin/true)} {(1234567890123456)})
    (C {(run)} {(./1234567890123456)})
    (C {(ln)} {(/usr/bin/true)} {(12345678901234567)})
    (C {(run)} {(./12345678901234567)})
    (SimpleCommand
      words: [{(echo)} {(SQ <'main(){volatile int s; fork(); s = *(int *)0;}'>)}]
      redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(core.c)} spids:[279])]
    )
    (C {(cc)} {(-o)} {(core)} {(core.c)})
    (C {(echo)} {(Generating)} {(segmentation)} {(fault.)})
    (C {(./core)})
    (C {(echo)} {(Turning)} {(off)} {(redirected)} {(accounting.)})
    (C {(accton)})
    (C {(echo)} {(Packing)} {(the)} {(results.)})
    (SimpleCommand
      words: [{(sa)} {(-u)} {($ VSub_Name '$ACCT')}]
      redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(sa.u)} spids:[330])]
    )
    (SimpleCommand
      words: [{(lastcomm)} {(-cesuS)} {(-f)} {($ VSub_Name '$ACCT')}]
      redirects: [(Redir op_id:Redir_Great fd:-1 arg_word:{(lastcomm.cesuS)} spids:[341])]
    )
    (Pipeline
      children: [
        (C {(tar)} {(-cf)} {(-)} {(acct)} {(sa.u)} {(lastcomm.cesuS)} {(Lit_Other '*') (.time)})
        (C {(gzip)} {(-c)})
        (SimpleCommand
          words: [{(uuencode)} {($ VSub_Name '$RESULTS')}]
          redirects: [
            (Redir
              op_id: Redir_Great
              fd: -1
              arg_word: {(../) ($ VSub_Name '$RESULTS') (.uue)}
              spids: [371]
            )
          ]
        )
      ]
      negated: False
    )
    (C {(echo)} {(Cleaning)} {(up.)})
    (C {(cd)} {(..)})
    (C {(rm)} {(-rf)} {($ VSub_Name '$TMPDIR')})
    (C {(echo)} 
      {(DQ ('Done!  Please send your reply, enclosing the file ') ($ VSub_Name '$RESULTS') (.uue))}
    )
    (C {(echo)} {(If)} {(your)} {(system)} {(runs)} {(with)} {(accounting)} {(enabled)} {(you)} {(probably)} 
      {(need)} {(to)} {(run) (Lit_Other ':')}
    )
    (C {(echo)} {(accton)} {(/var/account/acct)})
  ]
)