为了删除数组中的元素,在一般位置使用undef$etc是不可行的,除了shift pop在某些特殊位置处理数据,那么如何在Perl数组中删除某个值?武林技术频道小编带你细细道来。
从下面的代码开始:
use Data::Dumper qw(Dumper);
my @dwarfs = qw(Doc Grumpy Happy Sleepy Sneezy Dopey Bashful);
print Dumper /@dwarfs;
使用Data::Dumper打印时,得到如下输出:
$VAR1 = [
'Doc',
'Grumpy',
'Happy',
'Sleepy',
'Sneezy',
'Dopey',
'Bashful'
];
将元素赋值为undef
使用undef()函数的返回值:
use Data::Dumper qw(Dumper);
my @dwarfs = qw(Doc Grumpy Happy Sleepy Sneezy Dopey Bashful);
$dwarfs[3] = undef;
print Dumper /@dwarfs;
这些代码会把3号元素(数组中第4个元素)赋值为undef,但是并不改变数组的大小:
$VAR1 = [
'Doc',
'Grumpy',
'Happy',
undef,
'Sneezy',
'Dopey',
'Bashful'
];
直接对数组的某个元素使用undef()函数也会产生相同的结果:
use Data::Dumper qw(Dumper);
my @dwarfs = qw(Doc Grumpy Happy Sleepy Sneezy Dopey Bashful);
undef $dwarfs[3];
print Dumper /@dwarfs;
所以,$dwarfs[3] = undef; 和 undef $dwarfs[3];的作用是一样的,它们都能把值赋成undef。
使用splice从数组移除元素
splice函数会从数组中彻底删除元素:
use Data::Dumper qw(Dumper);
my @dwarfs = qw(Doc Grumpy Happy Sleepy Sneezy Dopey Bashful);
splice @dwarfs, 3, 1;
print Dumper /@dwarfs;
$VAR1 = [
'Doc',
'Grumpy',
'Happy',
'Sneezy',
'Dopey',
'Bashful'
];
如何在Perl数组中删除某个值?就为各位朋友们总结到这里了,是不是知道应该怎么学习了,只要经过一段时间的学习,大家就会掌握有关的内容。