下面列出了示例数据。
'3.268160E-02',
'2.433833E-02',
'2.473959E-01',
'4.960246E-06',
'1.470189E-05',
'1.527312E-05',
'8.997553E+01',
'8.981999E+01',
'2.700648E+02',
'2.656095E+02',
'2.719822E+02',
'2.695895E+02'
例如,如果我有一个列表 [2, 4, 3],我想检查以下条件:
检查 2 是否大于 0(列表中的第一个数字)或者 2 是否大于 4(列表中的下一个数字)。 检查 4 是否大于 2(前一个数字)或者 4 是否大于 3(下一个数字)。 检查 3 是否大于 4(前一个数字)或者 3 是否大于 0(列表中的最后一个数字)。
我该如何实现这个?
如果您想将它们视为数字,那就这么做吧。 Perl 会自动完成。您可以对它们进行简单的排序:
my @sorted_list = sort { $a <=> $b } @numbers;
但请记住,如果您只想要最大值,则排序成本很高,而且成本太高。
List::Util
来查找最大或最小值。
use List::Util qw(max min);
say max (@numbers);
say min (@numbers);