That should be sort {$$b[1] <=> $$a[1]} not sort {@$b[1] <=> @$a[1]}
In reply to Re^2: Using file handles by ikegami in thread Using file handles by gitarwmn