Ejecutando las Pruebas en un Conjunto de Máquinas

El siguiente programa muestra un guión sencillo que permite ejecutar las pruebas en un conjunto de máquinas remotas con las que se ha establecido un sistema de autentificación automática. Al ejecutar el programa se transfiere la distribución, se desempaqueta y se pasan las pruebas sobre cada máquina:

lhp@nereida:~/Lperl/src/perl_testing_adn_examples/chapter_03/Algorithm-Knap01DP-0.25$ make remotetest
remotetest.pl Algorithm-Knap01DP-0.25.tar.gz orion beowulf
************orion************
Checking if your kit is complete...
Looks good
Writing Makefile for Algorithm::Knap01DP
cp lib/Algorithm/Knap01DP.pm blib/lib/Algorithm/Knap01DP.pm
Manifying blib/man3/Algorithm::Knap01DP.3pm
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" \
       "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/01alltests....ok
t/02bench.......ok
        1/2 skipped: Algorithm::Knapsack not installed
All tests successful, 1 subtest skipped.
Files=2, Tests=16,  0 wallclock secs ( 0.10 cusr +  0.01 csys =  0.11 CPU)
************beowulf************
Checking if your kit is complete...
Looks good
Writing Makefile for Algorithm::Knap01DP
cp lib/Algorithm/Knap01DP.pm blib/lib/Algorithm/Knap01DP.pm
Manifying blib/man3/Algorithm::Knap01DP.3pm
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" \
       "-e" "test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/01alltests....ok
t/02bench.......ok
        1/2 skipped: various reasons
All tests successful, 1 subtest skipped.
Files=2, Tests=16,  0 wallclock secs ( 0.11 cusr +  0.01 csys =  0.12 CPU)
lhp@nereida:~/Lperl/src/perl_testing_adn_examples/chapter_03/Algorithm-Knap01DP-0.25$