my $fh = FileHandle->new(">./test");
print $fh "Hello\n";

##</code><code>##

$hashref->{"fh"} =  FileHandle->new(">./test");
print $hashref->{"fh"}  "Hello\n";

##</code><code>##

 
 $hashref->{"fh"}->print()