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

NAME

  Bio::DOOP::Cluster - Doop cluster object

VERSION

Version 0.01

SYNOPSIS

  This object represent the cluster.
  Usage:

  $cluster = Bio::DOOP::Cluster->new($db,"81007400","500");
  print $cluster->get_cluster_id;

AUTHOR

  Tibor Nagy, Godollo, Hungary

METHODS

new_by_id

  Bio::DOOP::Cluster->new_by_id($db,"2453");
  Used by internal MySQL querys

get_id

  $cluster_id = $cluster->get_id;

  Return with the MySQL id.

get_cluster_id

  Return the cluster id

get_promo_type

  $pt = $cluster->get_promo_type;

  Visszaadja a promoter elvi meretet (500,1000,3000 bp elvi meretu lehet)

get_type

  print $cluster->get_type;

  Visszaadja a promoter tipusat (1,2,3,4,5,6 tipusu lehet az exonok fugvenyeben)

get_date

  $date = $cluster->get_date;

  Az adatbazisba kerulesenek az idopontja

get_version

  print $cluster->get_version;

  A cluster verzioszama

get_all_subsets

  This is return with all the subsets linked to the cluster
  @subsets = @{$cluster->get_all_subsets};

get_all_seqs

  @seqs = @{$cluster->get_all_seqs};
  Return all the sequences that are linked to the cluster