数字排序

@sorted = sort { $a <=> $b } @list;

将 $a 和 $b 与 <=> 运算符进行比较可确保它们在数值上进行比较，而不是默认情况下进行文本比较。