Недавно я наткнулся на следующий фрагмент кода на Perl, который возвращает минимальное числовое значение среди всех переданных аргументов.
return 0 + ( sort { $a <=> $b } grep { $_ == $_ } @_ )[0];
Я обычно использую простой линейный поиск, чтобы найти минимум/максимум в списке, который мне кажется простым и достаточно оптимальным. Является ли приведенный выше код лучше, чем простой линейный поиск? Что делать с perl в этом случае? Спасибо!