Select Code to Download

#!/usr/bin/perl

...
       # ... Many more points -- see the original code ...
  ];
}

package Shape;

...


1;