Re: open $self->{FILE}

[Prior Nacre V]

Change

print $self->{FILE} "some text here\n";

to

print { $self->{FILE} } "some text here\n";