Select Code to Download

#!/usr/bin/perl

...
  {
  ... data points removed to shorten listing
  }

                             A          
                      MNOPQRSB          
...
                          yxwvut      l 
                                s    m  
                                rqpon