Help for this page

Select Code to Download


  1. or download this
    #! perl -slw
use strict;
...

my @geoPolys = $geo->polygons;
pp \@geoPolys;
  2. or download this
    C:\test>voronoi
[
...
  [51, [750, 650], [750, 650], [750, 550], [650, 550], [650, 550], [65
+0, 650]],
  [52, [850, 650], [850, 650], [850, 550], [750, 550], [750, 550], [75
+0, 650]],
]