Need more of your code snippet to figure out context.
Mainly, what is $fhin your script?
We are left to assume you did a my $fh = new Harness; or something, but somehow I bet that's not right.
Especially given that there doesn't (according to Ultra) appear to be an open()method in the Test::Harnessmodule.