gpt4 book ai didi

Perl 使用自定义比较函数查找最小值

转载 作者:行者123 更新时间:2023-12-02 07:47:55 25 4
gpt4 key购买 nike

有没有一种方法可以使用自定义比较函数在数组中找到最小值,除了对它进行排序并取第一项?

最佳答案

您可以使用 reduce 创建一个来自 List::Util .

use List::Util qw/reduce/;
$min = reduce { $a < $b ? $a : $b } 1..10 # regular minimum

如果你想比较字符串,例如,替换<le (尽管 List::Util 也导出 minstr )。

关于Perl 使用自定义比较函数查找最小值,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/5603787/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com