(CommandList
  children: [
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(perl-test-unit)} spids:[9])]
      spids: [9]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:_pkgreal) op:Equal rhs:{(Test-Unit)} spids:[12])]
      spids: [12]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(0.25)} spids:[15])]
      spids: [15]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(0)} spids:[18])]
      spids: [18]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:pkgdesc)
          op: Equal
          rhs: {(DQ ('A unit testing framework'))}
          spids: [21]
        )
      ]
      spids: [21]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:url)
          op: Equal
          rhs: {(DQ ('http://search.cpan.org/dist/Test-Unit/'))}
          spids: [26]
        )
      ]
      spids: [26]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (noarch))} spids:[31])]
      spids: [31]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:license)
          op: Equal
          rhs: {(DQ ('GPL PerlArtistic'))}
          spids: [36]
        )
      ]
      spids: [36]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:options) op:Equal rhs:{(DQ ('!check'))} spids:[41])]
      spids: [41]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:cpandepends)
          op: Equal
          rhs: {(DQ ('perl-class-inner perl-error perl-devel-symdump'))}
          spids: [46]
        )
      ]
      spids: [46]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:cpanmakedepends) op:Equal rhs:{(DQ )} spids:[51])]
      spids: [51]
    )
    (Assignment
      keyword: Assign_None
      pairs: [(assign_pair lhs:(LhsName name:cpancheckdepends) op:Equal rhs:{(DQ )} spids:[55])]
      spids: [55]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:depends)
          op: Equal
          rhs: {(DQ ($ VSub_Name '$cpandepends'))}
          spids: [59]
        )
      ]
      spids: [59]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:makedepends)
          op: Equal
          rhs: {(DQ ('perl-dev ') ($ VSub_Name '$cpanmakedepends'))}
          spids: [64]
        )
      ]
      spids: [64]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:checkdepends)
          op: Equal
          rhs: {(DQ ($ VSub_Name '$cpancheckdepends'))}
          spids: [70]
        )
      ]
      spids: [70]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:subpackages)
          op: Equal
          rhs: {(DQ ($ VSub_Name '$pkgname') (-doc))}
          spids: [75]
        )
      ]
      spids: [75]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:source)
          op: Equal
          rhs: 
            {
              (DQ ('http://search.cpan.org/CPAN/authors/id/M/MC/MCAST/') ($ VSub_Name '$_pkgreal') (-) 
                ($ VSub_Name '$pkgver') ('.tar.gz\n') ('\ttestcase.patch')
              )
            }
          spids: [81]
        )
      ]
      spids: [81]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:builddir)
          op: Equal
          rhs: {(DQ ($ VSub_Name '$srcdir') (/) ($ VSub_Name '$_pkgreal') (-) ($ VSub_Name '$pkgver'))}
          spids: [91]
        )
      ]
      spids: [91]
    )
    (FuncDef
      name: prepare
      body: 
        (BraceGroup
          children: [
            (AndOr
              ops: [Op_DPipe]
              children: [
                (C {(default_prepare)})
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
            )
            (C {(cd)} {(DQ ($ VSub_Name '$builddir'))})
            (C {(export)} 
              {(Lit_VarLike 'CFLAGS=') 
                (CommandSubPart
                  command_list: 
                    (CommandList
                      children: [(C {(perl)} {(-MConfig)} {(-E)} {(SQ <'say $Config{ccflags}'>)})]
                    )
                  left_token: <Left_CommandSub '$('>
                  spids: [128 138]
                )
              }
            )
            (SimpleCommand
              words: [{(perl)} {(Makefile.PL)} {(Lit_VarLike 'INSTALLDIRS=') (vendor)}]
              more_env: [(env_pair name:PERL_MM_USE_DEFAULT val:{(1)} spids:[141])]
            )
          ]
          spids: [105]
        )
      spids: [101 104]
    )
    (FuncDef
      name: build
      body: 
        (BraceGroup
          children: [
            (C {(cd)} {(DQ ($ VSub_Name '$builddir'))})
            (C {(export)} 
              {(Lit_VarLike 'CFLAGS=') 
                (CommandSubPart
                  command_list: 
                    (CommandList
                      children: [(C {(perl)} {(-MConfig)} {(-E)} {(SQ <'say $Config{ccflags}'>)})]
                    )
                  left_token: <Left_CommandSub '$('>
                  spids: [171 181]
                )
              }
            )
            (C {(make)})
          ]
          spids: [158]
        )
      spids: [154 157]
    )
    (FuncDef
      name: package
      body: 
        (BraceGroup
          children: [
            (C {(cd)} {(DQ ($ VSub_Name '$builddir'))})
            (AndOr
              ops: [Op_DPipe]
              children: [
                (C {(make)} {(Lit_VarLike 'DESTDIR=') (DQ ($ VSub_Name '$pkgdir'))} {(install)})
                (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)})
              ]
            )
            (C {(find)} {(DQ ($ VSub_Name '$pkgdir'))} 
              {(EscapedLiteralPart token:<Lit_EscapedChar '\\('>)} {(-name)} {(perllocal.pod)} {(-o)} {(-name)} {(.packlist)} 
              {(EscapedLiteralPart token:<Lit_EscapedChar '\\)'>)} {(-delete)}
            )
          ]
          spids: [193]
        )
      spids: [189 192]
    )
    (FuncDef
      name: check
      body: 
        (BraceGroup
          children: [
            (C {(cd)} {(DQ ($ VSub_Name '$builddir'))})
            (C {(export)} 
              {(Lit_VarLike 'CFLAGS=') 
                (CommandSubPart
                  command_list: 
                    (CommandList
                      children: [(C {(perl)} {(-MConfig)} {(-E)} {(SQ <'say $Config{ccflags}'>)})]
                    )
                  left_token: <Left_CommandSub '$('>
                  spids: [261 271]
                )
              }
            )
            (C {(make)} {(test)})
          ]
          spids: [248]
        )
      spids: [244 247]
    )
    (Assignment
      keyword: Assign_None
      pairs: [
        (assign_pair
          lhs: (LhsName name:sha512sums)
          op: Equal
          rhs: 
            {
              (DQ 
                (
'8f76583c7480eec825080eb6cd94d1b1a1c7c3bc7f297607414c95777e9a9f880b5a0d927a41521389ae50c2ba1b9ec3d76149da47d5997add739970df6b154d  Test-Unit-0.25.tar.gz\n'
                ) 
                (
'd7e874a687f93347cb03b403b55a9a765caa38aed1f24c437c6e4a43d287084366aff5a97b4990487f00979288146a29d36989059c8e83b702824348c0f86bc5  testcase.patch'
                )
              )
            }
          spids: [281]
        )
      ]
      spids: [281]
    )
  ]
)