Nope. You're using an array slice @x[$y] where you really want an element $x[$y]. And as pointed out elsewhere, you're using cmp where you want <=>.

-- Randal L. Schwartz, Perl hacker