my @array = qw( a b c );
print "@array\n";     # alle Elemente
print "$array[0]\n";  # erstes Element