if array#num is really a number, <=> might be a better option ...

@array = sort { $$a[2] <=> $$b[2] } @array;
[download]

--
Greg McCarroll
http://www.mccarroll.uklinux.net