(CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(perl-test-needs)} spids:[3])] spids: [3] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:_pkgreal) op:Equal rhs:{(DQ (Test-Needs))} spids:[6])] spids: [6] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(0.002005)} spids:[11])] spids: [11] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgrel) op:Equal rhs:{(0)} spids:[14])] spids: [14] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:pkgdesc) op: Equal rhs: {(DQ ('Test::Needs perl module'))} spids: [17] ) ] spids: [17] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ('http://search.cpan.org'))} spids: [22] ) ] spids: [22] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:arch) op:Equal rhs:{(DQ (noarch))} spids:[27])] spids: [27] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:license) op: Equal rhs: {(DQ ('GPL or Artistic'))} spids: [32] ) ] spids: [32] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:depends) op:Equal rhs:{(DQ )} spids:[37])] spids: [37] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:makedepends) op:Equal rhs:{(DQ (perl-dev))} spids:[41])] spids: [41] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:install) op:Equal rhs:{(DQ )} spids:[46])] spids: [46] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:subpackages) op: Equal rhs: {(DQ ($ VSub_Name '$pkgname') (-doc))} spids: [50] ) ] spids: [50] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ('http://search.cpan.org/CPAN/authors/id/H/HA/HAARG/Test-Needs-') ($ VSub_Name '$pkgver') (.tar.gz) ) } spids: [56] ) ] spids: [56] ) (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: [64] ) ] spids: [64] ) (FuncDef name: prepare body: (BraceGroup children: [ (Assignment keyword: Assign_Local pairs: [(assign_pair lhs:(LhsName name:i) op:Equal spids:[82])] spids: [80] ) (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: [111 113 137 -1] ) ] spids: [104 108 140] ) ] spids: [101 143] ) spids: [97 99] ) ] spids: [77] ) spids: [73 76] ) (FuncDef name: build body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name '$_builddir'))}) (AndOr children: [ (SimpleCommand words: [{(perl)} {(Makefile.PL)} {(Lit_VarLike 'INSTALLDIRS=') (vendor)}] more_env: [(env_pair name:PERL_MM_USE_DEFAULT val:{(1)} spids:[162])] ) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) (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: [152] ) spids: [148 151] ) (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: [200] ) spids: [196 199] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:md5sums) op: Equal rhs: {(DQ ('356634a56c99282e8059f290f5d534c8 Test-Needs-0.002005.tar.gz'))} spids: [251] ) ] spids: [251] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha256sums) op: Equal rhs: { (DQ ( '5a4f33983586edacdbe00a3b429a9834190140190dab28d0f873c394eb7df399 Test-Needs-0.002005.tar.gz' ) ) } spids: [256] ) ] spids: [256] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( 'b3023067d1f8726b0ae2162d0b3722193a3b56d12d5c207cf9558f1552ae8ab554773b843d00f1c481857c259fa869b8fdaf5a4838ab0768f38726ddec4130c6 Test-Needs-0.002005.tar.gz' ) ) } spids: [261] ) ] spids: [261] ) ] )