in reply to Re: Reference is experimental
in thread Reference is experimental

Which could also be written as 
my (undef, @tmp) = <FILEHANDLE>;

[download]

In Section Seekers of Perl Wisdom