perl - 我如何从列表中检查更大的数字？

Question

样本数据是这样的，我可以找到更大的数字，只要第一个和最后一个数字假设为 0？

                                      '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

如何？请帮助我。

Answer 1

如果您想将它们视为数字，那就去做吧。Perl 会自动完成。您可以对它们进行简单排序：

my @sorted_list = sort { $a <=> $b } @numbers;

但是请记住，如果您只想要最大值，排序是昂贵的并且成本太高。

或者您可以使用它List::Util来查找最大值或最小值。

use List::Util qw(max min);
say max (@numbers);
say min (@numbers);