Thread Probleme beim Testen von Class::Util (5 answers)
Opened by skirnir at 2008-10-01 12:02

skirnir
 2008-10-01 15:48
#115065 #115065
User since
2006-05-09
29 Artikel
BenutzerIn
[default_avatar]
Danke für die Erklärung.
Ich habe mal versucht,
Code: (dl )
no strict 'refs'
einzubauen. Jetzt bekomme ich diesen Fehler:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
t/11_load.................NOK 2/5                                            
# Failed test 'Loading a missing class'
# at t/11_load.t line 13.
# ''
# doesn't match '(?-xism:^Can't locate)'
# Looks like you failed 1 test of 5.
t/11_load.................dubious
Test returned status 1 (wstat 256, 0x100)
DIED. FAILED test 2
Failed 1/5 tests, 80.00% okay


Der entsprechende Test sieht so aus:

Code (perl): (dl )
1
2
3
; my $c1 = 'c1'
; eval{ Class::Util::load $c1 }
; like $@, qr/^Can't locate/, 'Loading a missing class'


Wäre zu erklären, wenn nurdie Bedingung
Code: (dl )
not defined %{ $_ . '::' }
greifen würde (was nach deiner Erklärung zumindest sehr unwahrscheinlich ist). [<--EDIT: Satz berichtigt]

Interessanterweise bekomme ich aber das, was der Test mutmaßlich erwartet über diesen Einzeiler (nach einem force install):

Code: (dl )
1
2
3
4
5
6
# perl -MClass::Util -e 'Class::Util::load c1; print $@'
Can't locate c1.pm in @INC (@INC contains: /usr/lib/perl5/5.10.0/i386-linux-thread-multi /usr/lib/perl5/5.10.0
/usr/local/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi /usr/local/lib/perl5/site_perl/5.10.0 /usr/lib/perl5
/vendor_perl/5.10.0/i386-linux-thread-multi /usr/lib/perl5/vendor_perl/5.10.0 /usr/lib/perl5/vendor_perl /usr/local
lib/perl5/site_perl/5.10.0/i386-linux-thread-multi /usr/local/lib/perl5/site_perl/5.10.0 /usr/local/lib/perl5/site_perl
/usr/lib/perl5/site_perl .) at (eval 1) line 1.

^ Zeilenumbrüche von mir

Wie kann das sein?

View full thread Probleme beim Testen von Class::Util