Michael G Schwern wrote:
> Probably just a subtle difference in the message. Probably the
> filename isn't "t/Whitehole.t" on Win32... probably a different
> case or some ~1 sillyness. Could you run the test program in the
> debugger, break at line 61 and tell me what $@ is? Also, tell me
> what $0 is.
this is the output:
P:\cpantest\Class-WhiteHole-0.03>perl -d -Mblib t\WhiteHole.t
Default die handler restored.
Loading DB routines from perl5db.pl version 1.07
Editor support available.
Enter h or `h h' for help, or `perldoc perldebug' for more help.
Using P:/cpantest/Class-WhiteHole-0.03/blib
main::(t\WhiteHole.t:12): my $loaded;
DB<1> b 61
DB<2> c
1..6
ok 1 - compile
ok 2 - static methods work
ok 3 - autoloader blocked
Test::(t\WhiteHole.t:61): ::ok( $ok, "Dying message p
reserved");
DB<2> p $@
Can't locate object method "bar" via package "Test" at t\WhiteHole.t line 57.
DB<3> p $0
t\WhiteHole.t
DB<4> q
interestingly enough, invoking the program as 't/WhiteHole.t', $0
seems to be set correctly, but $@ contains the same error message:
P:\cpantest\Class-WhiteHole-0.03>perl -d -Mblib t/WhiteHole.t
Default die handler restored.
Loading DB routines from perl5db.pl version 1.07
Editor support available.
Enter h or `h h' for help, or `perldoc perldebug' for more help.
Using P:/cpantest/Class-WhiteHole-0.03/blib
main::(t/WhiteHole.t:12): my $loaded;
DB<1> b 61
DB<2> c
1..6
ok 1 - compile
ok 2 - static methods work
ok 3 - autoloader blocked
Test::(t/WhiteHole.t:61): ::ok( $ok, "Dying message p
reserved");
DB<2> p $@
Can't locate object method "bar" via package "Test" at t/WhiteHole.t line 57.
DB<3> p $0
t/WhiteHole.t
DB<4> q
> I'm going to go ahead and fix the test with that assumption in
> mind. Grab
> http://www.pobox.com/~schwern/src/Class-Whitehole-0.04.tar.gz and
> see if that works. (I'm still curious about what $@ and $0 are
> under Win32).
this version passes all tests successfully.
cheers,
Aldo
__END__
$_=q,just perl,,s, , another ,,s,$, hacker,,print;
