如何使用Perl连接两个索引之间的数组元素?

Roh*_*nga 12 perl

我有一个字符串数组: @array

我想连接与数组索引开始的所有字符串$i$j.我怎样才能做到这一点?

xie*_*hao 20

$newstring = join('', @array[$i..$j])
Run Code Online (Sandbox Code Playgroud)

  • @iamrohitbanga是的:`$#array`是一个更简单的说法`scalar @ array - 1` (4认同)
  • 重点是使用意味着你想要的那个.因为在这种情况下你想要`@ array`中的最后一个东西,你要编写`$#array`,因为它*表示*@ array`中的最后一个索引.你不写'@array - 1`,因为这意味着"比'@ array`中的东西少一个". (3认同)
  • 我最后一次说`@ array-1 == $#array`时,有人指出"如果`$ [`已经改变了".不可否认,我们通常甚至不在乎考虑的奇怪场景,大部分时间...... (2认同)

dso*_*ano 8

my $foo = join '', @array[$i..$j];
Run Code Online (Sandbox Code Playgroud)

首先,我们生成一个包含我们想要的值的数组切片,然后我们将它们连接到空字符''上.