[Bio] / Sprout / SapServerTest4.pl Repository:
ViewVC logotype

View of /Sprout/SapServerTest4.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.2 - (download) (as text) (annotate)
Wed Sep 21 21:05:15 2011 UTC (7 years, 11 months ago) by parrello
Branch: MAIN
CVS Tags: rast_rel_2011_0928
Changes since 1.1: +16 -15 lines
Changes to support complexes.

### Test program for Ross's project.

use strict;
use SeedEnv;
use Tracer;
use Sapling;
use ALITREserver;

    my ($sap, $sapObject, $altObject);
    if ($ENV{SAS_SERVER} eq 'localhost') {
        $sap = Sapling->new(dbName => 'pubseed_sapling_07', dbhost => 'localhost', port => 3399);
#        $sap = Sapling->new(dbName => 'pseed_sapling_07', dbhost => 'localhost', port => 3333);
        $sapObject = SAPserver->new(sapDB => $sap, url => 'localhost');
        $altObject = ALITREserver->new(sapDB => $sap, url => 'localhost');
    } else {
        $sapObject = SAPserver->new();
        $altObject = ALITREserver->new();
    }
    my @roles = ('Acetate kinase (EC 2.7.2.1)', 'D-glucarate permease');
    my $roleHash = $sapObject->role_reactions(-ids => \@roles, -formulas => 1);
    my $roleHash2 = $sapObject->roles_to_complexes(-ids => \@roles);
    print "All done.\n";

1;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3