in reply to Re: Using file handles
in thread Using file handles

That should be
sort {$$b[1] <=> $$a[1]}
not
sort {@$b[1] <=> @$a[1]}