NAME

Segment2.pm - second idea of segmentation

SYNOPSIS

  use Segment2;
  Segment1::setup(angular_threshold=>10*3.14/180,length_threshold=>20);
  @stroke=qw(x0 y0 x1 y1 x2 y2 ...);
  $vectors=Segment2::segment(\@stroke);

DESCRIPTION

This modules implements a simple way of transforming a list of coordinates into a list of vectors.

FUNCTIONS

sub setup

sub segment

LICENSE

This code is copyright (C) 2002 Gianni Ceccarelli Released under the GNU LGPL, version 2.1