sort in perl not running..as desired

[Sangal-Arun]

How to changed the attached .pl script to get the following output from the attached sample text files.

pls take backup of the sample files: files.txt and file2.txt to work on those files.

Desired output after running the .pl script on files.txt should be:

For files.txt file:

/vob/efs/EFare/Database/Filer/AFares/afares.filer.c@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Database/Filer/AFares/afares.filer.c@@/main/pub-int/jul0908-dev/2

For file2.txt file:

/vob/efs/EFare/Database/Filer/AFares/afares.filer.c@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Database/Filer/AFares/afares.filer.c@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/bbq.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/context_fields/faredisplay.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/faredisplay.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/faredisplay.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/faredisplay/faredisplay.pl@@/main/pub-int/jul0908-dev/3
/vob/efs/EFare/Server/faredisplay/faredpout.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/faredpout.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/faredisplay/faredprec3.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/faredprec3.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/faredisplay/faredprule.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/faredprule.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/faredisplay/faredprule.pl@@/main/pub-int/jul0908-dev/3
/vob/efs/EFare/Server/faredisplay/galileoKLR.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/faredisplay/galileoKLR.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/faredisplay/intlfaredpout.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/fareretrieval.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/fareretrieval.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/fat.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/3
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/4
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/5
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/10
/vob/efs/EFare/Server/fq_inputKLR.pl@@/main/pub-int/jul0908-dev/20
/vob/efs/EFare/Server/fq_responseKLR.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/fq_responseKLR.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/Library/libdata/c.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/Library/libdata/c.pl@@/main/pub-int/jul0908-dev/2
/vob/efs/EFare/Server/Library/libdata/libdata.pl@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/Library/libdata/table999.prolog.c@@/main/pub-int/jul0908-dev/1
/vob/efs/EFare/Server/Library/libdata/table999.prolog.c@@/main/pub-int/jul0908-dev/2

[Sangal-Arun]

Here is the solution.

PS attached .pl file (updated version).