(CommandList children: [ (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgname) op:Equal rhs:{(perl-html-tree)} spids:[9])] spids: [9] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:_pkgreal) op:Equal rhs:{(HTML-Tree)} spids:[12])] spids: [12] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:pkgver) op:Equal rhs:{(5.07)} 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 ('Work with HTML in a DOM-like tree structure'))} spids: [21] ) ] spids: [21] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:url) op: Equal rhs: {(DQ ('http://search.cpan.org/dist/HTML-Tree/'))} 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:cpandepends) op: Equal rhs: {(DQ ('perl-html-tagset perl-html-parser'))} spids: [41] ) ] spids: [41] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:cpanmakedepends) op: Equal rhs: {(DQ (perl-test-fatal))} spids: [46] ) ] spids: [46] ) (Assignment keyword: Assign_None pairs: [(assign_pair lhs:(LhsName name:cpancheckdepends) op:Equal rhs:{(DQ )} spids:[51])] spids: [51] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:depends) op: Equal rhs: {(DQ ($ VSub_Name '$cpandepends'))} spids: [55] ) ] spids: [55] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:makedepends) op: Equal rhs: {(DQ ('perl-dev perl-module-build ') ($ VSub_Name '$cpanmakedepends'))} spids: [60] ) ] spids: [60] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:checkdepends) op: Equal rhs: {(DQ ($ VSub_Name '$cpancheckdepends'))} spids: [66] ) ] spids: [66] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:subpackages) op: Equal rhs: {(DQ ($ VSub_Name '$pkgname') (-doc))} spids: [71] ) ] spids: [71] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:source) op: Equal rhs: { (DQ ('http://search.cpan.org/CPAN/authors/id/K/KE/KENTNL/') ($ VSub_Name '$_pkgreal') (-) ($ VSub_Name '$pkgver') (.tar.gz) ) } spids: [77] ) ] spids: [77] ) (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: [86] ) ] spids: [86] ) (FuncDef name: prepare body: (BraceGroup children: [ (AndOr children: [ (C {(default_prepare)}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) (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: [123 133] ) } ) (AndOr children: [ (C {(perl)} {(Build.PL)} {(Lit_VarLike 'installdirs=') (vendor)}) (ControlFlow token:<ControlFlow_Return return> arg_word:{(1)}) ] op_id: Op_DPipe ) ] spids: [100] ) spids: [96 99] ) (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: [169 179] ) } ) (AndOr children:[(C {(./Build)})(C {(./Build)} {(test)})] op_id:Op_DAmp) ] spids: [156] ) spids: [152 155] ) (FuncDef name: package body: (BraceGroup children: [ (C {(cd)} {(DQ ($ VSub_Name '$builddir'))}) (AndOr children: [ (C {(./Build)} {(install)} {(Lit_VarLike 'destdir=') (DQ ($ VSub_Name '$pkgdir'))}) (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: [197] ) spids: [193 196] ) (Assignment keyword: Assign_None pairs: [ (assign_pair lhs: (LhsName name:sha512sums) op: Equal rhs: { (DQ ( 'a1faaf547d7db323388d5f6b289ab96887de5a80add55aefd380e4b540948514550a86785bdccf0776dfff38085b6bd3e98228f96231264217adcfc2f132c5de HTML-Tree-5.07.tar.gz' ) ) } spids: [249] ) ] spids: [249] ) ] )