in reply to open $self->{FILE}
Change
print $self->{FILE} "some text here\n"; [download]
to
print { $self->{FILE} } "some text here\n"; [download]
Regards,
PN5