oil AST

(CommandList
  children: [
    (C {(echo)} {(DQ ('Content-type: text/html'))})
    (C {(echo)} {(DQ )})
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:header) op:Equal rhs:{(DQ (header.html))} spids:[18])]
      spids: [18]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:footer) op:Equal rhs:{(DQ (footer.html))} spids:[23])]
      spids: [23]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:count) op:Equal rhs:{(0)} spids:[28])]
      spids: [28]
    )
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(Lit_Other '[')} {(-f)} {($ VSub_Name '$header')} {(Lit_Other ']')})
              terminator: <Op_Semi ';'>
            )
          ]
          action: [(C {(cat)} {($ VSub_Name '$header')})]
          spids: [16777215 44]
        )
      ]
      else_action: [
        (C {(echo)} {(DQ ("<html><body bgcolor='white' link='#666666' vlink='#999999'><center>"))})
      ]
      spids: [51 60]
    )
    (C {(echo)} {(DQ ("<table cellpadding='3' cellspacing='5'>"))})
    (ForEach
      iter_name: name
      iter_words: [
        {
          (CommandSubPart
            command_list: 
              (CommandList
                children: [
                  (Pipeline
                    children: [
                      (C {(file)} {(/var/www/html/) (Lit_Other '*')})
                      (C {(grep)} {(image)})
                      (C {(cut)} {(-d) (Lit_Other ':')} {(-f1)})
                    ]
                    negated: F
                  )
                ]
              )
            left_token: <Left_CommandSub '$('>
            spids: [76 96]
          )
        }
      ]
      do_arg_iter: F
      body: 
        (DoGroup
          children: [
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:name)
                  op: Equal
                  rhs: 
                    {
                      (CommandSubPart
                        command_list: 
                          (CommandList
                            children: [(C {(basename)} {($ VSub_Name '$name')})]
                          )
                        left_token: <Left_Backtick '`'>
                        spids: [102 106]
                      )
                    }
                  spids: [101]
                )
              ]
              spids: [101]
            )
            (If
              arms: [
                (if_arm
                  cond: [
                    (Sentence
                      child: 
                        (C {(Lit_Other '[')} {($ VSub_Name '$count')} {(-eq)} {(4)} {(Lit_Other ']')})
                      terminator: <Op_Semi ';'>
                    )
                  ]
                  action: [
                    (C {(echo)} {(DQ ("</td></tr><tr><td align='center'>"))})
                    (Assignment
                      keyword: Assign_None
                      pairs: [(assign_pair lhs:(LhsName name:count) op:Equal rhs:{(1)} spids:[133])]
                      spids: [133]
                    )
                  ]
                  spids: [16777215 123]
                )
              ]
              else_action: [
                (C {(echo)} {(DQ ("</td><td align='center'>"))})
                (Assignment
                  keyword: Assign_None
                  pairs: [
                    (assign_pair
                      lhs: (LhsName name:count)
                      op: Equal
                      rhs: 
                        {
                          (ArithSubPart
                            anode: 
                              (ArithBinary
                                op_id: Arith_Plus
                                left: (ArithWord w:{($ VSub_Name '$count')})
                                right: (ArithWord w:{(Lit_Digits 1)})
                              )
                            spids: [148 157]
                          )
                        }
                      spids: [147]
                    )
                  ]
                  spids: [147]
                )
              ]
              spids: [137 160]
            )
            (Assignment
              keyword: Assign_None
              pairs: [
                (assign_pair
                  lhs: (LhsName name:nicename)
                  op: Equal
                  rhs: 
                    {
                      (DQ 
                        (CommandSubPart
                          command_list: 
                            (CommandList
                              children: [
                                (Pipeline
                                  children: [
                                    (C {(echo)} {($ VSub_Name '$name')})
                                    (C {(sed)} {(SQ <'s/.jpg//;s/-/ /g'>)})
                                  ]
                                  negated: F
                                )
                              ]
                            )
                          left_token: <Left_CommandSub '$('>
                          spids: [166 178]
                        )
                      )
                    }
                  spids: [164]
                )
              ]
              spids: [164]
            )
            (C {(echo)} 
              {
                (DQ ("<a href='../") ($ VSub_Name '$name') ("' target=_new><img style='padding:2px'"))
              }
            )
            (C {(echo)} 
              {
                (DQ ("src='../") ($ VSub_Name '$name') 
                  ("' height='200' width='200' border='1'></a><BR>")
                )
              }
            )
            (C {(echo)} {(DQ ("<span style='font-size: 80%'>") ($ VSub_Name '$nicename') ('</span>'))})
          ]
          spids: [98 209]
        )
      spids: [75 16777215]
    )
    (C {(echo)} {(DQ ('</td></tr></table>'))})
    (If
      arms: [
        (if_arm
          cond: [
            (Sentence
              child: (C {(Lit_Other '[')} {(-f)} {($ VSub_Name '$footer')} {(Lit_Other ']')})
              terminator: <Op_Semi ';'>
            )
          ]
          action: [(C {(cat)} {($ VSub_Name '$footer')})]
          spids: [16777215 231]
        )
      ]
      else_action: [(C {(echo)} {(DQ ('</center></body></html>'))})]
      spids: [238 247]
    )
    (ControlFlow token:<ControlFlow_Exit exit> arg_word:{(0)})
  ]
)