Select Code to Download

my $fh = $self->{fh};
print $fh "Hello world\n";

print { $self->{fh} } "Hello world\n";

use IO::Handle qw( );
$self->{fh}->print("Hello world\n");