my @a; # this is okay my $a[1];# no good