G::DB

SDB

Summary Included libraries Package variables Synopsis Description General documentation Methods

Summary
G::Seq::Eliminate - Perl extension for blah blah blah
Package variables top
Globals (from use vars definitions)
@EXPORT
$VERSION
@EXPORT_OK
Included modulestop
File::Basename
G::Messenger
Storable
SubOpt
strict
Inherit top
AutoLoader Exporter
Synopsistop
  use G::Seq::Primitive;
blah blah blah
Descriptiontop
Stub documentation for G::Seq::Eliminate was created by h2xs. It looks like the
author of the extension was negligent enough to leave the stub
unedited.

Blah blah blah.
Methodstop
BEGIN Code
DESTROYNo descriptionCode
_sdb_pathNo descriptionCode
newNo descriptionCode
sdb_loadNo descriptionCode
sdb_saveNo descriptionCode

Methods description


Methods code

BEGINtop
BEGIN {
    eval "use Storable;";
    if ($@){ warn "$@"
}
DESTROYdescriptiontopprevnext
sub DESTROY {
    my $self = shift;
}
_sdb_pathdescriptiontopprevnext
sub _sdb_path {
    my $path = '/usr/local/g-language/.glang/';

    mkdir($path, 0777);

    return $path;
}
newdescriptiontopprevnext
sub new {
    my $pkg = shift;
    my $filename = shift;
    my $option = shift;
    my $this;

    return $this;
}
sdb_loaddescriptiontopprevnext
sub sdb_load {
    my $name = shift;
    my $path = _sdb_path();

    return retrieve($path . $name);
}
sdb_savedescriptiontopprevnext
sub sdb_save {
    my $val = shift;
    my $name = shift || 'tmp';
    my $path = _sdb_path();

    store($val, $path . $name);

    return 1;
}

General documentation

AUTHOR top
A. U. Thor, a.u.thor@a.galaxy.far.far.away
SEE ALSO top
perl(1).