> perl
open my $x, ">", "/tmp/tst";
$x->print("hu hu");
print `cat /tmp/tst`;                      
__END__
Can't locate object method "print" via package "IO::Handle" at - line 2.