Help for this page
my @test = ( 0 ); if ( defined @{ $test[1] }[1] ){} my $l = @test; print $l;
my @test = ( 0 ); if ( defined $test[1] && defined @{ $test[1] }[1] ){} my $l = @test; print $l;