eval 'use Category::'.$category{$$methods{'category'}}[0].';'.
     'my $handle = Category::'.$category{$$methods{'category'}}[0].'->new();'.
     '$handle->'.$category{$$methods{'category'}}[1].'($key, $params, $testCase);';
print $@ if ($@);