(Sort) for perl script

I have a perl script that runs my accommodation site and I wish to have a (Sort) code included into the perl script so as it will display my paid listings at the top of my pages when it lists the hotels in any given town. Each of my listings are stored in a flat-file database. The (Sort) would be sorting on $field[26] of my database. ## Deliverables The code for the (Sort) must included the correct information which is gathered from a flat-file database. ## Platform my perl scripts run on Unix.