or download this
psdoc.pl Devel::CoverX::Covered::Db test_files_covering
METHODS
test_files_covering($source_file_name, [$sub]) : @test_file_names
Return list of test files that cover any line in $source_file_name
+. Or
if $sub is passed, limit to test files covering that sub.