Ejecución

Cuando ejecutamos las pruebas obtenemos un contraejemplo a nuestra aserción de que my_function devuelve valores positivos:

lhp@nereida:~/Lperl/src/LectroTest/Titi$ make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" 
         "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/01lectro....
t/01lectro....NOK 1#     Failed test (t/01lectro.t at line 17)
#     '-9'
#         >=
#     '0'
#     Counterexample:
#     $x = -1;
#     $y = 3;
# Looks like you failed 1 test of 2.
t/01lectro....dubious
        Test returned status 1 (wstat 256, 0x100)
DIED. FAILED test 1
        Failed 1/2 tests, 50.00% okay
t/Titi........ok
Failed Test  Stat Wstat Total Fail  Failed  List of Failed
-------------------------------------------------------------------------------
t/01lectro.t    1   256     2    1  50.00%  1
Failed 1/2 test scripts, 50.00% okay. 1/3 subtests failed, 66.67% okay.
make: *** [test_dynamic] Error 255