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"; # BAD Syntax 11 print "Last element is '@array[$#array]'.\n"; # BAD Syntax