NAME

Gesture::Simple - the $1 (mouse) gesture recognizer

SYNOPSIS

    my $recognizer = Gesture::Simple->new;

    my @points = read_mouse_coordinates();
    my $gesture = Gesture::Simple::Gesture->new(
        points => \@points,
    );

    my $match = $recognizer->match($gesture);
    if ($match) {
        print $match->template->name;
    }
    else {
        $recognizer->add_template(
            Gesture::Simple::Template->new(
                points => \@points,
                name   => readline(),
            ),
        );
    }

AUTHOR

Shawn M Moore, sartak@gmail.com

WARNING

This module is alpha quality. Use it at your own risk.

SEE ALSO

http://faculty.washington.edu/wobbrock/pubs/uist-07.1.pdf - Paper describing the algorithm

http://depts.washington.edu/aimgroup/proj/dollar/ - Javascript example of the algorithm

COPYRIGHT AND LICENSE

Copyright 2009 Shawn M Moore.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.