小编dev*_*ech的帖子

如何比较Perl中的数组?

我有两个数组,@a@b.我想在两个数组的元素之间进行比较.

my @a = qw"abc def efg ghy klm ghn";
my @b = qw"def ghy jgk lom com klm";
Run Code Online (Sandbox Code Playgroud)

如果任何元素匹配,则设置一个标志.有没有简单的方法来做到这一点?

arrays perl

7
推荐指数
3
解决办法
5万
查看次数

如何在Perl中提取此文件名的部分内容?

在包含Changeset列的Excel工作表中,我得到的变更集如下:

C:\ccviews\hgdasdff-9302\dfcsz\ahgrt\kjhssl\ASGHLS@@\main\ajsdkljlat\hahdasdhfk\1\test.txt\sub\hsdaklfl\3
Run Code Online (Sandbox Code Playgroud)

我需要split在Perl脚本中使用函数,这样就会有两个输出(输入为上面的字符串)

  • @@之前的部分(例如 - 这里C:\ccviews\hgdasdff-9302\dfcsz\ahgrt\kjhssl\ASGHLS)
  • 字符串的最后一个字符(例如 - 这里3)

regex perl

2
推荐指数
1
解决办法
1601
查看次数

标签 统计

perl ×2

arrays ×1

regex ×1