Skip Menu |
 

This queue is for tickets about the Test-Harness CPAN distribution.

Report information
The Basics
Id: 65378
Status: resolved
Priority: 0/
Queue: Test-Harness

People
Owner: andy [...] hexten.net
Requestors: jjore [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: (no value)
Fixed in: (no value)



Subject: Undeclared dependency on Getopt::Long 2.34
Download (untitled) / with headers
text/plain 6.2k
From the Getopt::Long CHANGES file: Changes in version 2.34 ----------------------- * Auto-vivification of array and hash refs If an option is specified to require an array or hash ref, and a scalar reference is passed, this is auto-vivified to array or hash ref. Example: @ARGV = qw(--foo=xx); GetOptions("foo=s@", \$var); # Now $var->[0] eq "xx" And in the Test::Harness-3.22 tests: Test-Harness-3.22$ /opt/perl/install/64bitint/perl-5.6.1/bin/perl -Mblib t/prove.t 2>&1 ok 1506 - Switch --ext=.wango: no parse error ok 1507 - Switch --ext=.wango: archive has the expected value ok 1508 - Switch --ext=.wango: argv has the expected value ok 1509 - Switch --ext=.wango: backwards has the expected value ok 1510 - Switch --ext=.wango: blib has the expected value ok 1511 - Switch --ext=.wango: color has the expected value ok 1512 - Switch --ext=.wango: directives has the expected value ok 1513 - Switch --ext=.wango: exec has the expected value not ok 1514 - Switch --ext=.wango: extensions has the expected value # Failed test 'Switch --ext=.wango: extensions has the expected value' # at t/prove.t line 1601. # Structures begin differing at: # $got = '.wango' # $expected = ARRAY(0x8ba6f20) # got .wango for extensions ok 1515 - Switch --ext=.wango: failures has the expected value ok 1516 - Switch --ext=.wango: formatter has the expected value ok 1517 - Switch --ext=.wango: harness has the expected value ok 1518 - Switch --ext=.wango: includes has the expected value ok 1519 - Switch --ext=.wango: lib has the expected value ok 1520 - Switch --ext=.wango: merge has the expected value ok 1521 - Switch --ext=.wango: parse has the expected value ok 1522 - Switch --ext=.wango: quiet has the expected value ok 1523 - Switch --ext=.wango: really_quiet has the expected value ok 1524 - Switch --ext=.wango: recurse has the expected value ok 1525 - Switch --ext=.wango: shuffle has the expected value ok 1526 - Switch --ext=.wango: taint_fail has the expected value ok 1527 - Switch --ext=.wango: taint_warn has the expected value ok 1528 - Switch --ext=.wango: verbose has the expected value ok 1529 - Switch --ext=.wango: warnings_fail has the expected value ok 1530 - Switch --ext=.wango: warnings_warn has the expected value not ok 1531 - Switch --ext=.wango: no error OK # Failed test 'Switch --ext=.wango: no error OK' # at t/prove.t line 1618. # Switch --ext=.wango: error: Can't use string (".wango") as an ARRAY ref while "strict refs" in use at /home/josh/.cpan/build/Test-Harness-3.22/blib/lib/App/Prove/State.pm line 371. # not ok 1532 - Switch --ext=.wango: run results match # Failed test 'Switch --ext=.wango: run results match' # at t/prove.t line 1633. # Structures begin differing at: # $got->[0] = Does not exist # $expected->[0] = ARRAY(0x8ba6f98) # $VAR1 = { # 'got' => [], # 'wanted' => [ # [ # '_runtests', # { # 'verbosity' => 0, # 'show_count' => 1 # }, # 'TAP::Harness' # ] # ] # }; ok 1533 - Switch --ext=.foo --ext=.bar: App::Prove created OK ok 1534 - The object isa App::Prove ok 1535 - The object isa FakeProve ok 1536 - Switch --ext=.foo --ext=.bar: no parse error ok 1537 - Switch --ext=.foo --ext=.bar: archive has the expected value ok 1538 - Switch --ext=.foo --ext=.bar: argv has the expected value ok 1539 - Switch --ext=.foo --ext=.bar: backwards has the expected value ok 1540 - Switch --ext=.foo --ext=.bar: blib has the expected value ok 1541 - Switch --ext=.foo --ext=.bar: color has the expected value ok 1542 - Switch --ext=.foo --ext=.bar: directives has the expected value ok 1543 - Switch --ext=.foo --ext=.bar: exec has the expected value not ok 1544 - Switch --ext=.foo --ext=.bar: extensions has the expected value # Failed test 'Switch --ext=.foo --ext=.bar: extensions has the expected value' # at t/prove.t line 1601. # Structures begin differing at: # $got = '.bar' # $expected = ARRAY(0x8ba7070) # got .bar for extensions ok 1545 - Switch --ext=.foo --ext=.bar: failures has the expected value ok 1546 - Switch --ext=.foo --ext=.bar: formatter has the expected value ok 1547 - Switch --ext=.foo --ext=.bar: harness has the expected value ok 1548 - Switch --ext=.foo --ext=.bar: includes has the expected value ok 1549 - Switch --ext=.foo --ext=.bar: lib has the expected value ok 1550 - Switch --ext=.foo --ext=.bar: merge has the expected value ok 1551 - Switch --ext=.foo --ext=.bar: parse has the expected value ok 1552 - Switch --ext=.foo --ext=.bar: quiet has the expected value ok 1553 - Switch --ext=.foo --ext=.bar: really_quiet has the expected value ok 1554 - Switch --ext=.foo --ext=.bar: recurse has the expected value ok 1555 - Switch --ext=.foo --ext=.bar: shuffle has the expected value ok 1556 - Switch --ext=.foo --ext=.bar: taint_fail has the expected value ok 1557 - Switch --ext=.foo --ext=.bar: taint_warn has the expected value ok 1558 - Switch --ext=.foo --ext=.bar: verbose has the expected value ok 1559 - Switch --ext=.foo --ext=.bar: warnings_fail has the expected value ok 1560 - Switch --ext=.foo --ext=.bar: warnings_warn has the expected value not ok 1561 - Switch --ext=.foo --ext=.bar: no error OK # Failed test 'Switch --ext=.foo --ext=.bar: no error OK' # at t/prove.t line 1618. # Switch --ext=.foo --ext=.bar: error: Can't use string (".bar") as an ARRAY ref while "strict refs" in use at /home/josh/.cpan/build/Test-Harness-3.22/blib/lib/App/Prove/State.pm line 371. # not ok 1562 - Switch --ext=.foo --ext=.bar: run results match # Failed test 'Switch --ext=.foo --ext=.bar: run results match' # at t/prove.t line 1633. # Structures begin differing at: # $got->[0] = Does not exist # $expected->[0] = ARRAY(0x8ba70f4) # $VAR1 = { # 'got' => [], # 'wanted' => [ # [ # '_runtests', # { # 'verbosity' => 0, # 'show_count' => 1 # }, # 'TAP::Harness' # ] # ] # };
Download (untitled) / with headers
text/plain 249b
I believe this was fixed by commit 7a74c8622c579aa278c006e220ef41773cd26ccc Author: Andy Armstrong <andy@hexten.net> Date: Mon Dec 6 16:35:50 2010 +0000 Workaround for Getopt::Long 2.25 handling of multivalue options. Thanks for the report.


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.