PATH=/usr/bin:/bin Start 2013-06-20T14:53:40 ActivePerl-1800 CPAN-2.00 Reading '/home/fly1800/var/cpan/Metadata' Database was generated on Thu, 20 Jun 2013 21:17:03 GMT Running make for T/TI/TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz Checksum for /net/nas/data/cpan/authors/id/T/TI/TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz ok PostgreSQL-PLPerl-Trace-1.001 PostgreSQL-PLPerl-Trace-1.001/Changes PostgreSQL-PLPerl-Trace-1.001/lib/PostgreSQL/PLPerl PostgreSQL-PLPerl-Trace-1.001/lib/PostgreSQL/PLPerl/Trace.pm PostgreSQL-PLPerl-Trace-1.001/t PostgreSQL-PLPerl-Trace-1.001/t/00-load.t PostgreSQL-PLPerl-Trace-1.001/t/10-trace.t PostgreSQL-PLPerl-Trace-1.001/META.yml PostgreSQL-PLPerl-Trace-1.001/LICENSE PostgreSQL-PLPerl-Trace-1.001/README /bin/tar: Read 8192 bytes from - PostgreSQL-PLPerl-Trace-1.001/t/release-pod-coverage.t PostgreSQL-PLPerl-Trace-1.001/t/release-pod-syntax.t PostgreSQL-PLPerl-Trace-1.001/META.json PostgreSQL-PLPerl-Trace-1.001/Makefile.PL PostgreSQL-PLPerl-Trace-1.001/MANIFEST CPAN.pm: Building T/TI/TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz >>> /home/fly1800/ap1800-297235/bin/perl-static Makefile.PL Checking if your kit is complete... Looks good Writing Makefile for PostgreSQL::PLPerl::Trace Writing MYMETA.yml and MYMETA.json >>> make cp lib/PostgreSQL/PLPerl/Trace.pm blib/lib/PostgreSQL/PLPerl/Trace.pm Manifying blib/man3/PostgreSQL::PLPerl::Trace.3 TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /home/fly1800/ap1800-297235/bin/perl-static "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/00-load.t ............... 1..1 ok 1 - use PostgreSQL::PLPerl::Trace; ok t/10-trace.t .............. 1..3 ok 1 ok 2 -- in ???: >> t/10-trace.t:19: $safe->reval("42424242") or die $@; -- in Safe::reval: >> /home/fly1800/var/megalib/Safe.pm:357: my ($obj, $expr, $strict) = @_; >> /home/fly1800/var/megalib/Safe.pm:358: die "Bad Safe object" unless $obj->isa('Safe'); >> /home/fly1800/var/megalib/Safe.pm:360: my $root = $obj->{Root}; >> /home/fly1800/var/megalib/Safe.pm:362: my $evalsub = lexless_anon_sub($root, $strict, $expr); -- in Safe::lexless_anon_sub: >> /home/fly1800/var/megalib/Safe.pm:16: my $__ExPr__ = $_[2]; # must be a lexical to create the closure that >> /home/fly1800/var/megalib/Safe.pm:23: eval sprintf -- in (eval): >> (eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1: package PLPerl; sub { @_=(); eval q[local *SIG; my $__ExPr__;] . $__ExPr__; } -- in Safe::reval: >> /home/fly1800/var/megalib/Safe.pm:364: my $sg = sub_generation(); >> /home/fly1800/var/megalib/Safe.pm:365: my @subret = (wantarray) -- in main::__ANON__[(eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1]: >> (eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1: package PLPerl; sub { @_=(); eval q[local *SIG; my $__ExPr__;] . $__ExPr__; } >> (eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1: package PLPerl; sub { @_=(); eval q[local *SIG; my $__ExPr__;] . $__ExPr__; } -- in (eval): >> (eval 9)[(eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1]:1: local *SIG; my $__ExPr__;42424242 >> (eval 9)[(eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1]:1: local *SIG; my $__ExPr__;42424242 >> (eval 9)[(eval 8)[/home/fly1800/var/megalib/Safe.pm:23]:1]:1: local *SIG; my $__ExPr__;42424242 -- in Safe::reval: >> /home/fly1800/var/megalib/Safe.pm:368: _clean_stash($root.'::') if $sg != sub_generation(); -- in Safe::_clean_stash: >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:351: next if \%{$root.$_} eq \%$root; >> /home/fly1800/var/megalib/Safe.pm:352: _clean_stash($root.$_, $saved_refs); >> /home/fly1800/var/megalib/Safe.pm:342: my ($root, $saved_refs) = @_; >> /home/fly1800/var/megalib/Safe.pm:343: $saved_refs ||= []; >> /home/fly1800/var/megalib/Safe.pm:345: foreach my $hook (qw(DESTROY AUTOLOAD), grep /^\(/, keys %$root) { >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:346: push @$saved_refs, \*{$root.$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:347: delete ${$root}{$hook}; >> /home/fly1800/var/megalib/Safe.pm:350: for (grep /::$/, keys %$root) { -- in Safe::reval: >> /home/fly1800/var/megalib/Safe.pm:369: $obj->wrap_code_refs_within(@subret); -- in Safe::wrap_code_refs_within: >> /home/fly1800/var/megalib/Safe.pm:376: my $obj = shift; >> /home/fly1800/var/megalib/Safe.pm:378: %OID = (); >> /home/fly1800/var/megalib/Safe.pm:379: $obj->_find_code_refs('wrap_code_ref', @_); -- in Safe::_find_code_refs: >> /home/fly1800/var/megalib/Safe.pm:384: my $obj = shift; >> /home/fly1800/var/megalib/Safe.pm:385: my $visitor = shift; >> /home/fly1800/var/megalib/Safe.pm:387: for my $item (@_) { >> /home/fly1800/var/megalib/Safe.pm:388: my $reftype = $item && reftype $item -- in Safe::reval: >> /home/fly1800/var/megalib/Safe.pm:370: return (wantarray) ? @subret : $subret[0]; -- in ???: >> t/10-trace.t:20: $PostgreSQL::PLPerl::Trace::TRACE = 0; ok 3 - some lines should match ok t/release-pod-coverage.t .. skipped: these tests are for release candidate testing t/release-pod-syntax.t .... skipped: these tests are for release candidate testing All tests successful. Files=4, Tests=4, 0 wallclock secs ( 0.05 usr 0.01 sys + 0.16 cusr 0.01 csys = 0.23 CPU) Result: PASS TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz make test TEST_VERBOSE=1 -- OK Tim Bunce <Tim.Bunce@pobox.com> Trace execution of PostgreSQL PL/Perl code statements >>> (cd /home/fly1800/var/cpan/build/PostgreSQL-PLPerl-Trace-1.001-DDo5tz && tar cvf - PostgreSQL-PLPerl-Trace-1.001.ppd blib) | gzip -c >/home/fly1800/var/REPO/T/TI/TIMB/PostgreSQL-PLPerl-Trace-1.001.tar.gz PostgreSQL-PLPerl-Trace-1.001.ppd blib/ blib/lib/ blib/lib/PostgreSQL/ blib/lib/PostgreSQL/PLPerl/ blib/lib/PostgreSQL/PLPerl/Trace.pm blib/man3/ blib/man3/PostgreSQL::PLPerl::Trace.3 >>> mv /home/fly1800/var/cpan/build/PostgreSQL-PLPerl-Trace-1.001-DDo5tz/PostgreSQL-PLPerl-Trace-1.001.ppd /home/fly1800/var/REPO/T/TI/TIMB VmSize: 283252 kB Finished 2013-06-20T14:53:45