1
# $Id: fuzzpro.pm,v 1.6 2006/07/04 22:23:34 mauricio Exp $
2
# BioPerl module for Bio::Tools::Run::PiseApplication::fuzzpro
4
# Cared for by Catherine Letondal <letondal@pasteur.fr>
6
# For copyright and disclaimer see below.
8
# POD documentation - main docs before the code
12
Bio::Tools::Run::PiseApplication::fuzzpro
20
Bio::Tools::Run::PiseApplication::fuzzpro
24
FUZZPRO Protein pattern search (EMBOSS)
30
http://bioweb.pasteur.fr/seqanal/interfaces/fuzzpro.html
31
for available values):
39
sequence -- protein [sequences] (-sequence)
43
Search pattern (-pattern)
46
Number of mismatches (-mismatch)
57
User feedback is an integral part of the evolution of this and other
58
Bioperl modules. Send your comments and suggestions preferably to
59
the Bioperl mailing list. Your participation is much appreciated.
61
bioperl-l@bioperl.org - General discussion
62
http://bioperl.org/wiki/Mailing_lists - About the mailing lists
66
Report bugs to the Bioperl bug tracking system to help us keep track
67
of the bugs and their resolution. Bug reports can be submitted via the
70
http://bugzilla.open-bio.org/
74
Catherine Letondal (letondal@pasteur.fr)
78
Copyright (C) 2003 Institut Pasteur & Catherine Letondal.
81
This module is free software; you can redistribute it and/or modify
82
it under the same terms as Perl itself.
86
This software is provided "as is" without warranty of any kind.
94
http://bioweb.pasteur.fr/seqanal/interfaces/fuzzpro.html
98
Bio::Tools::Run::PiseApplication
102
Bio::Tools::Run::AnalysisFactory::Pise
106
Bio::Tools::Run::PiseJob
113
package Bio::Tools::Run::PiseApplication::fuzzpro;
117
use Bio::Tools::Run::PiseApplication;
119
@ISA = qw(Bio::Tools::Run::PiseApplication);
124
Usage : my $fuzzpro = Bio::Tools::Run::PiseApplication::fuzzpro->new($location, $email, @params);
125
Function: Creates a Bio::Tools::Run::PiseApplication::fuzzpro object.
126
This method should not be used directly, but rather by
127
a Bio::Tools::Run::AnalysisFactory::Pise instance.
128
my $factory = Bio::Tools::Run::AnalysisFactory::Pise->new();
129
my $fuzzpro = $factory->program('fuzzpro');
131
Returns : An instance of Bio::Tools::Run::PiseApplication::fuzzpro.
136
my ($class, $location, $email, @params) = @_;
137
my $self = $class->SUPER::new($location, $email);
139
# -- begin of definitions extracted from /local/gensoft/lib/Pise/5.a/PerlDef/fuzzpro.pm
141
$self->{COMMAND} = "fuzzpro";
142
$self->{VERSION} = "5.a";
143
$self->{TITLE} = "FUZZPRO";
145
$self->{DESCRIPTION} = "Protein pattern search (EMBOSS)";
147
$self->{OPT_EMAIL} = 0;
149
$self->{CATEGORIES} = [
154
$self->{DOCLINK} = "http://www.uk.embnet.org/Software/EMBOSS/Apps/fuzzpro.html";
156
$self->{_INTERFACE_STANDOUT} = undef;
157
$self->{_STANDOUT_FILE} = undef;
159
$self->{TOP_PARAMETERS} = [
169
$self->{PARAMETERS_ORDER} = [
172
"input", # input Section
173
"sequence", # sequence -- protein [sequences] (-sequence)
174
"required", # required Section
175
"pattern", # Search pattern (-pattern)
176
"mismatch", # Number of mismatches (-mismatch)
177
"output", # output Section
178
"outfile", # outfile (-outfile)
184
"fuzzpro" => 'String',
186
"input" => 'Paragraph',
187
"sequence" => 'Sequence',
188
"required" => 'Paragraph',
189
"pattern" => 'String',
190
"mismatch" => 'Integer',
191
"output" => 'Paragraph',
192
"outfile" => 'OutFile',
204
"perl" => '" -sequence=$value -sformat=fasta"',
209
"perl" => '" -pattern=$value"',
212
"perl" => '" -mismatch=$value"',
217
"perl" => '" -outfile=$value"',
220
"perl" => '" -auto -stdout"',
223
"perl" => '"fuzzpro"',
228
$self->{FILENAMES} = {
248
$self->{BY_GROUP_PARAMETERS} = [
266
$self->{ISHIDDEN} = {
280
$self->{ISCOMMAND} = {
293
$self->{ISMANDATORY} = {
308
"input" => "input Section",
309
"sequence" => "sequence -- protein [sequences] (-sequence)",
310
"required" => "required Section",
311
"pattern" => "Search pattern (-pattern)",
312
"mismatch" => "Number of mismatches (-mismatch)",
313
"output" => "output Section",
314
"outfile" => "outfile (-outfile)",
319
$self->{ISSTANDOUT} = {
334
"input" => ['sequence',],
335
"required" => ['pattern','mismatch',],
336
"output" => ['outfile',],
343
$self->{SEPARATOR} = {
349
"outfile" => 'outfile.out',
354
"init" => { "perl" => '1' },
355
"input" => { "perl" => '1' },
356
"sequence" => { "perl" => '1' },
357
"required" => { "perl" => '1' },
358
"pattern" => { "perl" => '1' },
359
"mismatch" => { "perl" => '1' },
360
"output" => { "perl" => '1' },
361
"outfile" => { "perl" => '1' },
362
"auto" => { "perl" => '1' },
374
$self->{WITHPIPEOUT} = {
385
$self->{WITHPIPEIN} = {
402
$self->{ISSIMPLE} = {
415
$self->{PARAMFILE} = {
421
"The standard IUPAC one-letter codes for the amino acids are used. <BR> The symbol `x\' is used for a position where any amino acid is accepted. <BR> Ambiguities are indicated by listing the acceptable amino acids for a given position, between square parentheses `[ ]\'. For example: [ALT] stands for Ala or Leu or Thr. <BR> Ambiguities are also indicated by listing between a pair of curly brackets `{ }\' the amino acids that are not accepted at a given position. For example: {AM} stands for any amino acid except Ala and Met. <BR> Each element in a pattern is separated from its neighbor by a `-\'. (Optional in fuzzpro). <BR> Repetition of an element of the pattern can be indicated by following that element with a numerical value or a numerical range between parenthesis. Examples: x(3) corresponds to x-x-x, x(2,4) corresponds to x-x or x-x-x or x-x-x-x. <BR> When a pattern is restricted to either the N- or C-terminal of a sequence, that pattern either starts with a `<\' symbol or respectively ends with a `>\' symbol. <BR> A period ends the pattern. (Optional in fuzzpro). <BR> For example, [DE](2)HS{P}X(2)PX(2,4)C",
426
$self->{SCALEMIN} = {
430
$self->{SCALEMAX} = {
434
$self->{SCALEINC} = {
442
# -- end of definitions extracted from /local/gensoft/lib/Pise/5.a/PerlDef/fuzzpro.pm
446
$self->_init_params(@params);
453
1; # Needed to keep compiler happy