(command.CommandList children: [ (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:pkgname) op: assign_op.Equal rhs: {<perl-email-mime-contenttype>} spids: [9] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:_pkgreal) op: assign_op.Equal rhs: {<Email-MIME-ContentType>} spids: [12] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:pkgver) op: assign_op.Equal rhs: {<1.022>} spids: [15] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:pkgrel) op: assign_op.Equal rhs: {<0>} spids: [18] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:pkgdesc) op: assign_op.Equal rhs: {(DQ <'Parse a MIME Content-Type Header'>)} spids: [21] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:url) op: assign_op.Equal rhs: {(DQ <'http://search.cpan.org/dist/Email-MIME-ContentType/'>)} spids: [26] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:arch) op: assign_op.Equal rhs: {(DQ <noarch>)} spids: [31] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:license) op: assign_op.Equal rhs: {(DQ <'GPL PerlArtistic'>)} spids: [36] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:cpandepends) op: assign_op.Equal rhs: {(DQ )} spids: [41] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:cpanmakedepends) op: assign_op.Equal rhs: {(DQ <' perl-capture-tiny '>)} spids: [45] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:depends) op: assign_op.Equal rhs: {(DQ ($ Id.VSub_DollarName '$cpandepends'))} spids: [50] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:makedepends) op: assign_op.Equal rhs: {(DQ <'perl-dev '> ($ Id.VSub_DollarName '$cpanmakedepends'))} spids: [55] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:subpackages) op: assign_op.Equal rhs: {(DQ ($ Id.VSub_DollarName '$pkgname') <-doc>)} spids: [61] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:source) op: assign_op.Equal rhs: { (DQ <'http://search.cpan.org/CPAN/authors/id/R/RJ/RJBS/'> ($ Id.VSub_DollarName '$_pkgreal') <-> ($ Id.VSub_DollarName '$pkgver') <.tar.gz> ) } spids: [67] ) ] ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:builddir) op: assign_op.Equal rhs: { (DQ ($ Id.VSub_DollarName '$srcdir') <'/'> ($ Id.VSub_DollarName '$_pkgreal') <-> ($ Id.VSub_DollarName '$pkgver') ) } spids: [76] ) ] ) (command.ShFunction name: check body: (BraceGroup children: [(C {<cd>} {(DQ ($ Id.VSub_DollarName '$builddir'))}) (C {<make>} {<test>})] ) ) (command.ShFunction name: prepare body: (BraceGroup children: [ (C {<cd>} {(DQ ($ Id.VSub_DollarName '$builddir'))}) (C {<export>} {<Id.Lit_VarLike 'CFLAGS='> (command_sub left_token: <Id.Left_Backtick '`'> child: (C {<perl>} {<-MConfig>} {<-E>} {(SQ <'say $Config{ccflags}'>)}) ) } ) (command.Simple words: [{<perl>} {<Makefile.PL>} {<Id.Lit_VarLike 'INSTALLDIRS='> <vendor>}] more_env: [(env_pair name:PERL_MM_USE_DEFAULT val:{<1>} spids:[139])] do_fork: T ) ] ) ) (command.ShFunction name: build body: (BraceGroup children: [ (C {<cd>} {(DQ ($ Id.VSub_DollarName '$builddir'))}) (C {<export>} {<Id.Lit_VarLike 'CFLAGS='> (command_sub left_token: <Id.Left_Backtick '`'> child: (C {<perl>} {<-MConfig>} {<-E>} {(SQ <'say $Config{ccflags}'>)}) ) } ) (C {<make>}) ] ) ) (command.ShFunction name: package body: (BraceGroup children: [ (C {<cd>} {(DQ ($ Id.VSub_DollarName '$builddir'))}) (command.AndOr ops: [Id.Op_DPipe] children: [ (C {<make>} {<Id.Lit_VarLike 'DESTDIR='> (DQ ($ Id.VSub_DollarName '$pkgdir'))} {<install>} ) (command.ControlFlow token: <Id.ControlFlow_Return return> arg_word: {<1>} ) ] ) (C {<find>} {(DQ ($ Id.VSub_DollarName '$pkgdir'))} {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\('>)} {<-name>} {<perllocal.pod>} {<-o>} {<-name>} {<.packlist>} {(word_part.EscapedLiteral token:<Id.Lit_EscapedChar '\\)'>)} {<-delete>} ) ] ) ) (command.ShAssignment pairs: [ (assign_pair lhs: (sh_lhs_expr.Name name:sha512sums) op: assign_op.Equal rhs: { (DQ < '38561922e0dbc180ac24003a3b64ef39e25a5607bbedc75a3e4580490ab84e02bfd5165225eff4884112cf1f82ec46ee62f31c047acea6b9a3cca390deb965be Email-MIME-ContentType-1.022.tar.gz' > ) } spids: [244] ) ] ) ] )