Array Perl

#The elements of the array are indexed by integers starting at 0. 
#The name of the array is preceeded by an "@" sign.
@names = ( "J", "M", "L" );
print "@names";  # Prints the array with elements separated by a space
print "$names[0] and $names[2]";  
print "$names[-1]\n";  
$names[3]="N";    # Assign a new value as the 4th element