| Subject: | Undeclared dependency on Getopt::Long 2.34 |
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'
# ]
# ]
# };