よくわからんが、カンで答えると、
「@log_lines」 がファイルの中身なら、
「foreach $line (@log_lines) {」
の前で 「&read」 ？でソートさせにいけばいいんじゃない？
それでもできないなら、上で答えてくれたソースをその 「&read」 でどう改造して使ってるかによるな。