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

View of /Sprout/SubsysRowsTest.pl

Parent Directory Parent Directory | Revision Log Revision Log


Revision 1.1 - (download) (as text) (annotate)
Mon Jan 16 20:05:49 2012 UTC (7 years, 3 months ago) by parrello
Branch: MAIN
CVS Tags: rast_rel_2014_0729, mgrast_version_3_2, rast_rel_2014_0912, HEAD
KBase reorg.

### Test program for Ross's project.

use strict;
use SeedEnv;
use Tracer;
use Sapling;
use Data::Dumper;

    my ($sap, $sapO);
    if ($ENV{SAS_SERVER} eq 'localhost') {
        $sap = Sapling->new(dbName => 'pubseed_sapling_09', dbhost => 'localhost', port => 3399);
#        $sap = Sapling->new(dbName => 'pseed_sapling_07', dbhost => 'localhost', port => 3333);
        $sapO = SAPserver->new(sapDB => $sap, url => 'localhost');
        $FIG_Config::orgCache = "P:/vol/public-pseed/SharedData/OrgCache";
    } else {
        $sapO = SAPserver->new();
    }
    my $ss = 'Lysine Biosynthesis DAP Pathway'; 
    my $g = '83333.1'; 
    my $rowH   =  $sapO->rows_of_subsystems({ -subs => [$ss], -genomes => [$g] });
    print &Dumper($ss,$g,$rowH); die "aborted";

1;

MCS Webmaster
ViewVC Help
Powered by ViewVC 1.0.3