| Subject: | Test failed on DragonFlyBSD 2.1 |
cpan[6]> test Expect
Running test for module 'Expect'
Running make for R/RG/RGIERSIG/Expect-1.21.tar.gz
CPAN: LWP::UserAgent loaded ok (v5.819)
Fetching with LWP:
http://cpan.fastbull.org/authors/id/R/RG/RGIERSIG/Expect-1.21.tar.gz
CPAN: Digest::SHA loaded ok (v5.47)
Checksum was ok
Scanning cache /root/.cpan/build for sizes
............................................................................DONE
x Expect-1.21/
x Expect-1.21/Changes
x Expect-1.21/examples/
x Expect-1.21/examples/kibitz/
x Expect-1.21/examples/kibitz/Changelog
x Expect-1.21/examples/kibitz/kibitz
x Expect-1.21/examples/kibitz/kibitz.man
x Expect-1.21/examples/kibitz/README
x Expect-1.21/examples/ssh.pl
x Expect-1.21/Expect.pm
x Expect-1.21/Expect.pod
x Expect-1.21/Makefile.PL
x Expect-1.21/MANIFEST
x Expect-1.21/META.yml
x Expect-1.21/README
x Expect-1.21/test.pl
x Expect-1.21/tutorial/
x Expect-1.21/tutorial/1.A.Intro
x Expect-1.21/tutorial/2.A.ftp
x Expect-1.21/tutorial/2.B.rlogin
x Expect-1.21/tutorial/3.A.debugging
x Expect-1.21/tutorial/4.A.top
x Expect-1.21/tutorial/5.A.top
x Expect-1.21/tutorial/5.B.top
x Expect-1.21/tutorial/6.A.smtp-verify
x Expect-1.21/tutorial/6.B.modem-init
x Expect-1.21/tutorial/README
CPAN: File::Temp loaded ok (v0.21)
Has already been made
Running make test
make: don't know how to make test. Stop
RGIERSIG/Expect-1.21.tar.gz
/usr/bin/make test -- NOT OK
//hint// to see the cpan-testers results for installing this module, try:
reports RGIERSIG/Expect-1.21.tar.gz
Failed during this command:
RGIERSIG/Expect-1.21.tar.gz : make_test NO
cpan[7]> test Expect
Running test for module 'Expect'
Running make for R/RG/RGIERSIG/Expect-1.21.tar.gz
Has already been unwrapped into directory
/root/.cpan/build/Expect-1.21-NsidoR
Has already been made
Running make test
make: don't know how to make test. Stop
RGIERSIG/Expect-1.21.tar.gz
/usr/bin/make test -- NOT OK
//hint// to see the cpan-testers results for installing this module, try:
reports RGIERSIG/Expect-1.21.tar.gz
Failed during this command:
RGIERSIG/Expect-1.21.tar.gz : make_test NO
lap# tar xzf Expect-1.21.tar.gz -C /tmp/
lap# cd /tmp/Expect-1.21/
lap# perl Makefile.PL
Checking if your kit is complete...
Looks good
Writing Makefile for Expect
lap# make test
cp Expect.pm blib/lib/Expect.pm
cp Expect.pod blib/lib/Expect.pod
PERL_DL_NONLAZY=1 /usr/pkg/bin/perl "-Iblib/lib" "-Iblib/arch" test.pl
1..42
Basic tests...
ok 1
Use of uninitialized value in numeric eq (==) at test.pl line 37.
not ok 2
# Test failed at test.pl line 22.
Died at test.pl line 22.
*** Error code 255
Stop in /tmp/Expect-1.21.
Then I've tried to look at test.pl with Perl debugger:
Warning: some settings and command-line options may be lost!
Loading DB routines from perl5db.pl version 1.3
Editor support enabled.
Enter h or `h h' for help, or `man perldebug' for more help.
1..42
DB<18> n
DB<18> n
DB<18> n
DB<18> $Expect::Exp_Internal = 1;
DB<19> $Expect::Debug = 1;
DB<20> n
Basic tests...
DB<20> n
DB<20> n
Spawned '/usr/pkg/bin/perl -v'
spawn id(6)
Pid: 1743
Tty: /dev/ttyp6
at blib/lib/Expect.pm line 184
Expect::spawn('Expect', '/usr/pkg/bin/perl -v') called at test.pl line 34
at blib/lib/Expect.pm line 184
Expect::spawn('Expect', '/usr/pkg/bin/perl -v') called at test.pl line 34
DB<20> n
ok 1
DB<20> n
DB<20> $exp->log_user(9);
DB<21> @aa = $exp->expect(10, "krzlbrtz", "Copyright");
expect(Expect=GLOB(0x2877ab90) 10 krzlbrtz Copyright) called...
expect(): handling param 'krzlbrtz'...
expect(): exact match 'krzlbrtz'...
expect(): handling param 'Copyright'...
expect(): exact match 'Copyright'...
Starting EXPECT pattern matching...
at blib/lib/Expect.pm line 561
Expect::expect('Expect=GLOB(0x2877ab90)', 10, 'krzlbrtz', 'Copyright')
called at (eval 14)[/usr/pkg/lib/perl5/5.10.0/perl5db.pl:638] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D
| $DB::db_stop;
@aa = $exp->expect(10, "krzlbrtz", "Copyright");;
;' called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 638
DB::eval called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 3434
DB::DB called at test.pl line 37
at blib/lib/Expect.pm line 561
Expect::expect('Expect=GLOB(0x2877ab90)', 10, 'krzlbrtz', 'Copyright')
called at (eval 14)[/usr/pkg/lib/perl5/5.10.0/perl5db.pl:638] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D
| $DB::db_stop;
@aa = $exp->expect(10, "krzlbrtz", "Copyright");;
;' called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 638
DB::eval called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 3434
DB::DB called at test.pl line 37
spawn id(6): beginning expect.
Timeout: 10 seconds.
Current time: Mon Jan 26 10:12:07 2009
spawn id(6): list of patterns:
#1: -ex `krzlbrtz'
#2: -ex `Copyright'
spawn id(6): Does `'
match:
pattern #1: -ex `krzlbrtz'? No.
pattern #2: -ex `Copyright'? No.
Waiting for new data (10 seconds)...
spawn id(6): new data.
spawn id(6): EOF
spawn id(6): exit(0x00)
spawn id(6): closing...
Closing spawn id(6).
at blib/lib/Expect.pm line 1431
Expect::hard_close('Expect=GLOB(0x2877ab90)') called at
blib/lib/Expect.pm line 894
Expect::_multi_expect(10, undef, 'ARRAY(0x287831c0)') called at
blib/lib/Expect.pm line 565
Expect::expect('Expect=GLOB(0x2877ab90)', 10, 'krzlbrtz', 'Copyright')
called at (eval 14)[/usr/pkg/lib/perl5/5.10.0/perl5db.pl:638] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D
| $DB::db_stop;
@aa = $exp->expect(10, "krzlbrtz", "Copyright");;
;' called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 638
DB::eval called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 3434
DB::DB called at test.pl line 37
at blib/lib/Expect.pm line 1431
Expect::hard_close('Expect=GLOB(0x2877ab90)') called at
blib/lib/Expect.pm line 894
Expect::_multi_expect(10, undef, 'ARRAY(0x287831c0)') called at
blib/lib/Expect.pm line 565
Expect::expect('Expect=GLOB(0x2877ab90)', 10, 'krzlbrtz', 'Copyright')
called at (eval 14)[/usr/pkg/lib/perl5/5.10.0/perl5db.pl:638] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D
| $DB::db_stop;
@aa = $exp->expect(10, "krzlbrtz", "Copyright");;
;' called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 638
DB::eval called at /usr/pkg/lib/perl5/5.10.0/perl5db.pl line 3434
DB::DB called at test.pl line 37
spawn id(6) closed.
Returning from expect with TIMEOUT or EOF
I hope this could be useful to fix.