G::SystemsBiology
Serizawa
G::Ecell::Serizawa - Perl extension for blah blah blah
|
Globals (from use vars definitions) |
@EXPORT |
$VERSION |
@EXPORT_OK |
use G::Ecell::Serizawa; blah blah blah
|
Stub documentation for G::Ecell::Serizawa was created by h2xs. It looks like the author of the extension was negligent enough to leave the stub unedited.
Blah blah blah.
|
DESTROY | No description | Code |
ecell | No description | Code |
er2eri | No description | Code |
new | No description | Code |
ss2er | No description | Code |
Methods description
Methods code
sub DESTROY
{ my $self = shift;
}
sub ecell
{ my @args = opt_get(@_);
my $gb = shift @args;
my $r = opt_val("r");
if (length $r){
system("ecell -r $r &");
}else{
system("ecell &");
}
}
sub er2eri
{ my $infile = shift;
my ($base, $dir, $ext) = fileparse($infile, '\..*');
system('er2eri ' . $infile . ' > ' . $dir . $base . '.eri');
return $dir . $base . '.eri';
}
sub new
{ my $pkg = shift;
my $filename = shift;
my $option = shift;
my $this;
return $this;
}
sub ss2er
{ my $infile = shift;
my ($base, $dir, $ext) = fileparse($infile, '\..*');
system('ss2er < ' . $infile . ' > ' . $dir . $base . '.er');
return $dir . $base . '.er';
}
General documentation