ENDPOINT DISTRIBUTION_ID STATUS VMW `1781183799.31152' IC--- WX `1781183799.32206' BN1 `1781183799.32206' BN2 `1781183799.32206' CAU `1781183799.32206' IC--- BN3 `1781183799.32206' IC--- BN4 `1781183799.32206' IC--E BN5 `1781183799.32206' IC--- BN6 `1781183799.32206' IC--- BN7 `1781183799.32206' IC--- #### open(FILE,"file.txt") my @Records = ; #### my @Records = sort {lc($a) cmp lc($b)} @Records and my @Records = sort {$a cmp $b} @Records my @Records = sort { $a[0] cmp $b[0] } @Records #### BN1 `1781183799.32206' BN2 `1781183799.32206' BN3 `1781183799.32206' IC--- BN4 `1781183799.32206' IC--E BN5 `1781183799.32206' IC--- BN6 `1781183799.32206' IC--- BN7 `1781183799.32206' IC--- CAU `1781183799.32206' IC--- VMW `1781183799.31152' IC--- WX `1781183799.32206'