Test::Class - Fehlermeldungen unterdrücken? - #146670 (Fragen zu Perl-Modulen)

roooot

2011-03-20 11:12

User since
2008-03-03
276 Artikel
BenutzerIn
[default_avatar]

Hi Leute,
mache gerade erste Versuche mit CPAN:

Test::Class. Habe früher nie großartig getestet, eher trial and error.
Nun habe ich mir mal eine kleine Testklasse geschrieben:

t/User/TestNewUser.pm

Code (perl): (dl )

package User::TestNewUser;

use base qw(Test::Class);
use Test::More;


sub test_valid_user: Test {     
    require_ok('Gallery3::IDM::User')
        or return 'cannot require Gallery3::IDM::User';
    require Gallery3::IDM::User;
    
    my $u = new Gallery3::IDM::User(id=>1);
    is(defined($u), 1, 'creating_valid_user');
}

1;

t/TestUser.t

Code (perl): (dl )

#!/usr/bin/perl
use User::TestNewUser;

# run all the test methods in Example::Test
Test::Class->runtests;

Nun sieht die Ausgabe aber leider mit strawberryperl unter win7 x64 so aus:

Code: (dl )

D:\chr\Documents\Eclipse Workspace\gallery3\cgi-bin\t>perl TestUser.t
1..1
not ok 1 - require Gallery3::IDM::User;
#   Failed test 'require Gallery3::IDM::User;'
#   at User/TestNewUser.pm line 8.
#   (in User::TestNewUser->test_valid_user)
#     Tried to require 'Gallery3::IDM::User'.
#     Error:  Can't locate Gallery3/IDM/User.pm in @INC (@INC contains: C:/strawberry/perl/site/lib C:/strawberry/perl/vendor/lib C:/strawberry/perl/lib .) at (
eval 12) line 2.
# Looks like you failed 1 test of 1.

Kann man diese Warnungen auch unterdrücken, sodass nur das Testergebnis angzeigt wird? Im Prinzip interessiert das die Ebene über mir nicht, was fehl schlägt, sondern, dass es fehlschlägt.

Die CPAN Tests beim Installieren sehen ja auch nur so aus: t/bla.t.....1/4 usw..

Danke für Input

Viele Grüße :)