in reply to Re: open $self->{FILE}
in thread open $self->{FILE}

Thanks to all for help 

print { $files[$i] } "stuff\n";

[download]
Definitly helps

In Section Seekers of Perl Wisdom