Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/10.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/6/opengl/4.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Perl 如何从列表中检查较大的数字?_Perl - Fatal编程技术网

Perl 如何从列表中检查较大的数字?

Perl 如何从列表中检查较大的数字?,perl,Perl,示例数据是这样的,当第一个和最后一个数字设为0时,我能找到更大的数字吗 '3.268160E-02', '2.433833E-02', '2.473959E-01',

示例数据是这样的,当第一个和最后一个数字设为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


怎么做?请帮帮我。

如果你想把它们当作数字,就这么做吧。Perl将自动完成这项工作。您可以对它们进行简单排序:

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

有点简单:$t=0;foreach$table{$t=$\uIf$\uGT$t}让我问一个非常限定的问题:什么?!请重新阅读您的问题,然后更改它,以便我们能够理解它。此外,对一系列数字进行排序,找出最大值或最小值,这样做只会稍微贵一点,根本没有必要。
use List::Util qw(max min);
say max (@numbers);
say min (@numbers);