1 #!/usr/bin/perl
 2 
 3 use strict;
 4 use warnings;
 5 
 6 my @array = ( 'red', 'green', 'blue' );
 7 
 8 print "\@array is '@array'.\n";
 9 
10 print "First element is '$array[0]'.\n";  # Corrected Syntax
11 print "Last element is '$array[$#array]'.\n";  # Corrected Syntax
12 


syntax highlighted by Code2HTML, v. 0.9.1