The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Bio::DOOP::Util::Filt - Filter a cluster list

VERSION

Version 0.3

SYNOPSIS

  use Bio::DOOP::DOOP;

  @list = ("81001020","81001110","81001200","80100006");
  $db   = Bio::DOOP::DBSQL->connect("username","passwd","doop-chordate-1_4","localhost");
  $filt = Bio::DOOP::Util::Filt->new_by_list($db,\@list,500);

  @res = @{$filt->filt_by_goid("0046872")};
  for(@res){
    print $_->get_cluster_id,"\n";
  }

DESCRIPTION

This object filters a clusterlist. It is useful to find a smaller cluster set from a large mofext or fuzznuc search result.

AUTHORS

Tibor Nagy, Godollo, Hungary and Endre Sebestyen, Martonvasar, Hungary

METHODS

new

Creates a new filter object from a cluster object array.

new_by_list

Creates a new filter class from a cluster id array.

new_by_id

Creates a new filter class from a cluster primary id array.

filt_by_goid

Filter the cluster list by GO ids.

  @filtered = @{$filt->filt_by_goid("0006523")};