Can you use File::Sort ? I have find that useful. It can sort by columns. You might want to extend for additional functionality that you want provide.