You say you could do this in Java. I suggest you write it in Java. When it's working, translate the java syntax into perl as far as you can. When you get stuck, post the Java code and your attempted translation hilighting the lines your having trouble with. You might then get assistance in correcting those lines.

It's good to understand how things work, and sorts are often used for this purpose when learning.