basic voronoi point creation in perl