my $szSortFunction = '$a cmp $b';
my @szSortedLines = sort { eval $szSortFunction } @szLinesToSort;