(CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(perl-tree-simple)} spids:[6])] spids: [6] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:_pkgreal) op:Equal rhs:{(Tree-Simple)} spids:[9])] spids: [9] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(1.18)} spids:[12])] spids: [12] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(1)} spids:[15])] spids: [15] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:pkgdesc) op: Equal rhs: {(DQ ('Tree::Simple Perl module'))} spids: [18] ) ] spids: [18] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ('http://search.cpan.org/dist/Tree-Simple/'))} spids: [23] ) ] spids: [23] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (noarch))} spids:[28])] spids: [28] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:license) op: Equal rhs: {(DQ ('GPL+ or Artistic'))} spids: [33] ) ] spids: [33] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:cpandepends) op: Equal rhs: {(DQ (perl-test-exception))} spids: [38] ) ] spids: [38] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:cpanmakedepends) op:Equal rhs:{(DQ )} spids:[43])] spids: [43] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:depends) op: Equal rhs: {(DQ ('perl ') ($ VSub_Name '$cpandepends'))} spids: [47] ) ] spids: [47] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:makedepends) op: Equal rhs: {(DQ ('perl-dev ') ($ VSub_Name '$cpanmakedepends'))} spids: [53] ) ] spids: [53] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:install) op:Equal rhs:{(DQ )} spids:[59])] spids: [59] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:subpackages) op: Equal rhs: {(DQ ($ VSub_Name '$pkgname') (-doc))} spids: [63] ) ] spids: [63] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ('http://www.cpan.org/modules/by-module/Tree/Tree-Simple-') ($ VSub_Name '$pkgver') (.tar.gz) ) } spids: [69] ) ] spids: [69] ) (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: [77] ) ] spids: [77] ) (FuncDef name: prepare body: (BraceGroup children: [ (Assignment keyword: Assign_Local pairs: [(assign_pair lhs:(LhsName name:i) op:Equal spids:[95])] spids: [93] ) (C {(cd)} {(DQ ($ VSub_Name '$_builddir'))}) (ForEach iter_name: i iter_words: [{($ VSub_Name '$source')}] do_arg_iter: False body: (DoGroup children: [ (Case to_match: {($ VSub_Name '$i')} arms: [ (case_arm pat_list: [{(Lit_Other '*') (.patch)}] action: [ (Sentence child: (C {(msg)} {($ VSub_Name '$i')}) terminator: <Op_Semi ';'> ) (AndOr children: [ (C {(patch)} {(-p1)} {(-i)} {(DQ ($ VSub_Name '$srcdir')) (/) ($ VSub_Name '$i')} ) (ControlFlow token: <ControlFlow_Return return> arg_word: {(1)} ) ] op_id: Op_DPipe ) ] spids: [124 126 150 -1] ) ] spids: [117 121 153] ) ] spids: [114 156] ) spids: [110 112] ) (AndOr children: [ (SimpleCommand words: [{(perl)} {(Makefile.PL)} {(Lit_VarLike 'INSTALLDIRS=') (vendor)}] more_env: [(env_pair name:PERL_MM_USE_DEFAULT val:{(1)} spids:[159])] ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) ] spids: [90] ) spids: [86 89] ) (FuncDef name: build body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name '$_builddir'))}) (AndOr children: [ (C {(make)}) (AndOr children: [ (C {(make)} {(test)}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) ] op_id: Op_DAmp ) ] spids: [182] ) spids: [178 181] ) (FuncDef name: package body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name '$_builddir'))}) (AndOr children: [ (C {(make)} {(Lit_VarLike 'DESTDIR=') (DQ ($ VSub_Name '$pkgdir'))} {(install)}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) (C {(find)} {(DQ ($ VSub_Name '$pkgdir'))} {(EscapedLiteralPart token:<Lit_EscapedChar '\\('>)} {(-name)} {(perllocal.pod)} {(-o)} {(-name)} {(.packlist)} {(EscapedLiteralPart token:<Lit_EscapedChar '\\)'>)} {(-delete)} ) ] spids: [213] ) spids: [209 212] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( 'f5918a865667db84800a5ff1a423c118f6e41c1b1930eb323d4afdaaf8a9da5554a0ac85eced3d1b9635065ff045f4ff6aab874c26771b8b4d36511fcc941ac0 Tree-Simple-1.18.tar.gz' ) ) } spids: [264] ) ] spids: [264] ) ] )