Perl中怎樣從數組中刪除某個值？_perl

我不確定undef是否和從數組中消除值有確切的關係，猜測一下，如果我們將undef視為"空"，那麼會有一些聯絡。但通常來說，將某些東西賦值為undef和刪除某些東西是不一樣的。

首先來看怎樣把數組的元素賦值為undef，之後再瞭解如何從數組中刪除元素。

從下面的代碼開始：

複製代碼 代碼如下:

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'
        ];

可以看到，在這個例子中，數組因為我們從數組中間移除了一個元素而縮短了一個單位。

這也就是怎樣從數組中刪除一個元素。