| CC: | gray [...] cpan.org |
| Subject: | Find method doesn't exist in Tree::Suffix ? |
| Date: | Fri, 03 Mar 2006 12:07:15 +0800 |
| To: | bug-tree-suffix [...] rt.cpan.org |
| From: | "Edward WIJAYA" <ewijaya [...] singnet.com.sg> |
Hi,
Again thanks so much for providing this
wonderful Perl interface to Generalized suffix tree.
However one of this critical method (find)
doesn't seem to work.
The message I got is this:
Can't locate object method "find" via package "Tree::Suffix" at
test_suffix.pl line 27.
Here is the script of mine:
__BEGIN__
use strict;
use Data::Dumper;
use Carp;
use Tree::Suffix;
my @strings = qw ( TTTTGGGGGGGGGGGGGGGGG
ATCGGGGGACCGTTCTCTCCCC );
my $string = 'ATCG';
my $tree = Tree::Suffix->new(@strings);
my $num = $tree->strings;
my $nodes = $tree->nodes;
print "NB OF STRINGS: $num , NO OF NODES: $nodes\n";
my @lcs = $tree->lcs;
print Dumper \@lcs ;
# All of above works except this:
my $bool = $tree->find($string);
print "$bool\n";
__END__
Hope to hear from you again.
--
Regards,
Edward WIJAYA
SINGAPORE