Algorithm::Annotate − represent a series of changes in annotate form
my $ann = Algorithm::Annotate−>new ();
$ann−>add ($info1, \@seq1);
$ann−>add ($info2, \@seq2); $ann−>add ($info3, \@seq3);
$result = $ann−>result;
Algorithm::Annotate generates a list that is useful for generating output simliar to "cvs annotate".
Might parse diff output and accumulate them for generating the annotate list.
Chia-liang Kao <[email protected]>
Copyright 2003 by Chia-liang Kao <[email protected]>.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.