(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'DATE='> name:DATE)
          op: assign_op.Equal
          rhs: 
            {
              (command_sub
                left_token: <Id.Left_Backtick '`'>
                child: (C {<'/usr/bin/date'>} {<Id.Lit_Other '+'> <Id.Lit_Other '%'> <d>})
                right: <Id.Backtick_Right '`'>
              )
            }
          spids: [80]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'RPT='> name:RPT)
          op: assign_op.Equal
          rhs: {<'/var/adm/sa/sar'> ($ Id.VSub_DollarName DATE)}
          spids: [91]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'DFILE='> name:DFILE)
          op: assign_op.Equal
          rhs: {<'/var/adm/sa/sa'> ($ Id.VSub_DollarName DATE)}
          spids: [95]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'ENDIR='> name:ENDIR)
          op: assign_op.Equal
          rhs: {<'/usr/bin'>}
          spids: [99]
        )
      ]
      redirects: []
    )
    (C {<cd>} {($ Id.VSub_DollarName ENDIR)})
    (command.Simple
      words: [
        {($ Id.VSub_DollarName ENDIR) <'/sar'>}
        {($ Id.VSub_Star '*')}
        {<-f>}
        {($ Id.VSub_DollarName DFILE)}
      ]
      redirects: [
        (redir
          op: <Id.Redir_Great '>'>
          loc: (redir_loc.Fd fd:1)
          arg: {($ Id.VSub_DollarName RPT)}
        )
      ]
      more_env: []
      do_fork: T
    )
    (C {<'/usr/bin/find'>} {<'/var/adm/sa'>} 
      {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\('> ch:'(')} {<-name>} {(SQ <'sar*'>)} {<-o>} {<-name>} {(SQ <'sa*'>)} 
      {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\)'> ch:')')} {<-mtime>} {<Id.Lit_Other '+'> <7>} {<-exec>} {<'/usr/bin/rm'>} {<Id.Lit_LBrace '{'> <Id.Lit_RBrace '}'>} 
      {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\;'> ch:';')}
    )
  ]
)