#!/usr/bin/perl
     print (1, 2, 7..10, 14, 15);

     print "\n" ;

     print ("A", "B", "F".."H", "Y", "Z"), "\n";
     print "\n" ;

print (("Bright Orange", "Burnt"), ("Canary Yellow", "Sunbeam"));

     print (("Bright Orange", "Burnt"), " Middle ", ("Canary Yellow", 

      "Sunbeam"));
     print "\n" ;

