есть тестовый код:

use strict;
use Data::Dumper;
my @a = qw(a b c);
print scalar(@a), "\n", Dumper(@a), "\n";
if ( $a[5]->[1]->[0] ) { die; }
print scalar(@a), "\n", Dumper(@a), "\n";

после его выполнения получаем:

3
$VAR1 = 'a';
$VAR2 = 'b';
$VAR3 = 'c';
6
$VAR1 = 'a';
$VAR2 = 'b';
$VAR3 = 'c';
$VAR4 = undef;
$VAR5 = undef;
$VAR6 = [
      undef,
      []
];

почему в массиве появились новые элементы?