foreach $test_run (keys(%test_hash)) { 
if ($test_hash{$test_run} == 1) { 
$test_execute = $test_run; 
$test_execute1 = $test_run."."."pm"; 
my $logfile = $test_execute."_log.txt"; 
print "the logfile is $logfile \n"; 
open (STDOUT, "| tee $logfile"); 
require "$test_execute1"; 
my $op = $test_execute->$test_execute(); 
}