use warnings; use strict; package Tools; use Log::Log4perl; my $log = Log::Log4perl::get_logger("Tools::run_test"); my $href = shift; sub run_tests { foreach my $test (keys %{$href}) { $log->info("running test $test with parameters $href->{$test}"); } exit; } 1;