Mercurial > repos > mahtabm > ensembl
comparison variant_effect_predictor/Bio/EnsEMBL/Funcgen/RunnableDB/Alignment.pm @ 0:1f6dce3d34e0
Uploaded
| author | mahtabm |
|---|---|
| date | Thu, 11 Apr 2013 02:01:53 -0400 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| -1:000000000000 | 0:1f6dce3d34e0 |
|---|---|
| 1 =pod | |
| 2 | |
| 3 =head1 NAME | |
| 4 | |
| 5 Bio::EnsEMBL::Funcgen::RunnableDB::Alignment; | |
| 6 | |
| 7 =head1 DESCRIPTION | |
| 8 | |
| 9 'Alignment' Is a base class for other classes dealing with Alignment | |
| 10 It contains virtually nothing so it may disappear and just pass to Funcgen | |
| 11 | |
| 12 =cut | |
| 13 | |
| 14 package Bio::EnsEMBL::Funcgen::RunnableDB::Alignment; | |
| 15 | |
| 16 use warnings; | |
| 17 use strict; | |
| 18 use Bio::EnsEMBL::Funcgen::Utils::Helper; | |
| 19 use Bio::EnsEMBL::DBSQL::DBAdaptor; | |
| 20 use Bio::EnsEMBL::Funcgen::DBSQL::DBAdaptor; | |
| 21 use Bio::EnsEMBL::Funcgen::InputSet; | |
| 22 use Bio::EnsEMBL::Funcgen::DataSet; | |
| 23 use Bio::EnsEMBL::Funcgen::FeatureSet; | |
| 24 use Bio::EnsEMBL::Funcgen::AnnotatedFeature; | |
| 25 | |
| 26 use base ('Bio::EnsEMBL::Funcgen::RunnableDB::Funcgen'); | |
| 27 | |
| 28 use Bio::EnsEMBL::Utils::Exception qw(throw warning stack_trace_dump); | |
| 29 use Data::Dumper; | |
| 30 | |
| 31 sub fetch_input { | |
| 32 my $self = shift @_; | |
| 33 | |
| 34 $self->param("file_type","sam"); | |
| 35 | |
| 36 $self->SUPER::fetch_input(); | |
| 37 | |
| 38 #Just override input folders... maybe consider overriding output folders too? | |
| 39 my $input_dir = $self->_work_dir()."/fastq/".$self->_species()."/".$self->_experiment_name()."/". | |
| 40 $self->_cell_type()->name."_".$self->_feature_type()->name; | |
| 41 $self->_input_dir($input_dir); | |
| 42 | |
| 43 #Folder where to send the final results... | |
| 44 my $repository = $self->_work_dir()."/alignments/".$self->_species."/".$self->_assembly()."/".$self->_experiment_name(); | |
| 45 $self->_repository($repository); | |
| 46 | |
| 47 return 1; | |
| 48 } | |
| 49 | |
| 50 #Private getter / setter to the input folder | |
| 51 sub _input_dir { | |
| 52 return $_[0]->_getter_setter('input_dir',$_[1]); | |
| 53 } | |
| 54 | |
| 55 #Private getter / setter to the repository folder | |
| 56 sub _repository { | |
| 57 return $_[0]->_getter_setter('repository',$_[1]); | |
| 58 } | |
| 59 | |
| 60 #Private getter / setter to an input file | |
| 61 sub _input_file { | |
| 62 return $_[0]->_getter_setter('input_file',$_[1]); | |
| 63 } | |
| 64 | |
| 65 | |
| 66 1; | |
| 67 |
