Subject: | lcs(min,max) |
#!/usr/bin/perl -w
use strict;
use Tree::Suffix;
my $tree = Tree::Suffix->new('bzoaxy','bfoawy');
my @res = $tree->lcs(0,1);
for (@res) { print $_,' '; }
print "\n";
Output: o a y
The letter 'b' is missing.
Distribution: Tree-Suffix-0.13
libstree version: 0.4.2
Perl version: v5.8.7 built for i486-linux-gnu-thread-multi
Operating system: Linux 2.6.15-1-k7