my $struct= {pointers=>[]};

##</code><code>##

$#{$struct->{pointers}} = last element index of pointers<br>
@{$struct->{pointers}} = array

##</code><code>##

$ptrs=[];
push @{$ptrs}=$newpointer;
$#{$ptrs}; last index
@{$ptrs}; array itself