(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'COMMON_STARTLST='> name:COMMON_STARTLST)
          op: assign_op.Equal
          rhs: {(DQ <'20sysetup '> <70uucp>)}
          spids: [82]
        )
      ]
      redirects: []
    )
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'INSDIR='> name:INSDIR)
          op: assign_op.Equal
          rhs: {(${ Id.VSub_Name ROOT) <'/etc/rc2.d'>}
          spids: [91]
        )
      ]
      redirects: []
    )
    (command.If
      arms: [
        (if_arm
          cond: 
            (condition.Shell
              commands: [
                (C {<Id.Lit_LBracket '['>} {<Id.KW_Bang '!'>} {<-d>} {(${ Id.VSub_Name INSDIR)} 
                  {<Id.Lit_RBracket ']'>}
                )
              ]
            )
          action: [(C {<mkdir>} {(${ Id.VSub_Name INSDIR)})]
          spids: [98 112]
        )
      ]
      else_action: []
      redirects: []
    )
    (command.ForEach
      iter_names: [f]
      iterable: (for_iter.Words words:[{(${ Id.VSub_Name COMMON_STARTLST)}])
      body: 
        (command.DoGroup
          children: [
            (command.ShAssignment
              pairs: [
                (assign_pair
                  lhs: (sh_lhs_expr.Name left:<Id.Lit_VarLike 'name='> name:name)
                  op: assign_op.Equal
                  rhs: 
                    {
                      (command_sub
                        left_token: <Id.Left_Backtick '`'>
                        child: 
                          (command.Pipeline
                            children: [
                              (C {<echo>} {($ Id.VSub_DollarName f)})
                              (C {<sed>} {<-e>} {(SQ <'s/^..//'>)})
                            ]
                            negated: F
                            stderr_indices: []
                          )
                        right: <Id.Backtick_Right '`'>
                      )
                    }
                  spids: [138]
                )
              ]
              redirects: []
            )
            (C {<rm>} {<-f>} {(${ Id.VSub_Name INSDIR) <'/S'> ($ Id.VSub_DollarName f)})
            (C {<ln>} {(${ Id.VSub_Name ROOT) <'/etc/init.d/'> (${ Id.VSub_Name name)} 
              {(${ Id.VSub_Name INSDIR) <'/S'> ($ Id.VSub_DollarName f)}
            )
          ]
        )
      redirects: []
    )
  ]
)