Update: Argh! Nevermind, I misunderstood the question.

If what's within the angle brackets is neither a filehandle nor a simple scalar variable containing a filehandle name, typeglob, or typeglob reference,

$infh is a typeglob reference, so it should work. Actually, it does, if the while(<$infh}>){ is replaced by while(<$infh>){.

Small change, big results ;-)

Arjen