perl - 如何获取数组中元素的索引?

标签 perl

Perl是否具有内置函数来获取数组中元素的索引?还是我需要自己编写这样的函数? [等同于PHP array_search()或JavaScript array.indexOf()]

最佳答案

use List::Util qw(first);
$idx = first { $array[$_] eq 'whatever' } 0..$#array;

(列表:: Util是核心)

要么
use List::MoreUtils qw(firstidx);
$idx = firstidx { $_ eq 'whatever' } @array;

(列表:: MoreUtils在CPAN上)

关于perl - 如何获取数组中元素的索引?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/3222138/

相关文章:

perl - 我应该将 .pl 还是 .cgi 用于 Perl Web 脚本文件?

perl - 如何使用 makefile/autoconf 制作可安装的 Perl 程序?

php - 当 pecl4win 关闭时从哪里获取 php_perl.dll?

perl - 如何改进此 perl/bash 单行程序以反序列化 json 数据

arrays - 正确检测 Perl 子例程参数是否为数组

perl - 如何在 Perl 模块中包含数据文件?

html - Perl:HTTP::微小删除留下损坏的 anchor 标记

regex - 如何使用 sed/perl/awk 查找和替换模式字符串?

perl - 这个表达能起作用吗?

perl - Log4Perl 将多个程序的日志记录捆绑到一个日志中