use strict;
use warnings;
no  autovivification;

my $array;

warn sprintf 'array is%s defined', defined $array ? '' : ' not';
warn         '$#$array is ',             $#$array;
warn sprintf 'array is%s defined', defined $array ? '' : ' not';