http://qs321.pair.com?node_id=676666

Kashratul has asked for the wisdom of the Perl Monks concerning the following question:

Hi Monks,

I have a perl file that uses selenium to open gmail -> log in -> log out.

The code is working correctly.

I have used Test::Harness just for a try.

use Test::Harness (runtests, execute_tests) ; @test_files = qw (gmail_selenium.pl); execute_tests(tests => \@test_files);

This is working correctly.

Now if I modify the code little bit:

use Test::Harness (runtests, execute_tests) ; @test_files = qw (gmail_selenium.pl); $total = execute_tests(tests => \@test_files); print $total->{max};
All is working correctly but the last line is not getting printed.

As per the information in CPAN (Test::Harness) => "Returns a list of two values, $total and $failed, describing the results."

I felt $total->{max} will return the total number of test runned (based on the info given in CPAN).

Can some one guide me why this is not getting printed?

Thanks