Select Code to Download

my @sorted = sort { 
    (split /\./, $a)[1] cmp (split /\./, $b)[1]
    } @LogAnalyser::LogFileList;

my @sorted = sort datestamp @LogAnalyser::LogFileList;

...
    return $left cmp $right;
}
}