(CommandList
  children: [
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(Lit_Other "[")} {(DQ ($ VSub_Name "$SSH_CLIENT"))} {(Lit_Other "]")})
              terminator: <Op_Semi ";">
            )
          ]
          action: [
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:expression)
                  op: Equal
                  rhs: 
                    {
                      (CommandSubPart
                        command_list: 
                          (CommandList
                            children: [
                              (Pipeline
                                children: [
                                  (C {(echo)} {(DQ ($ VSub_Name "$SSH_CLIENT"))})
                                  (C {(sed)} 
                                    {
                                      (SQ <"s/.*://;\n"> 
                                        <
"         s/^\\([0-9.]*\\) [0-9]* \\([0-9]*\\)$/not \\( host \\1 and port \\2 \\)/"
                                        >
                                      )
                                    }
                                  )
                                ]
                                negated: False
                              )
                            ]
                          )
                        left_token: <Left_CommandSub "$(">
                        spids: [60 80]
                      )
                    }
                  spids: [59]
                )
              ]
              spids: [59]
            )
          ]
          spids: [-1 56]
        )
      ]
      spids: [-1 82]
    )
    (C {(tcpdump)} {(DQ ($ VSub_At "$@"))} {($ VSub_Name "$expression")})
  ]
)