use strict;
use warnings;

my @names = '' x 6;
print "$names[2]\n";

__END__
Use of uninitialized value $names[2] in concatenation (.) or string at ...