Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl

...
}

dbINSERT('ORGANISM', 'ORG_NAME, GI, NC', "11111111", "some bacteria", 
+"NC_000000");

Select or download this

#!/usr/bin/perl

...
my $status = ( dbINSERT($db, 'ORGANISM', 'ORG_NAME, GI, NC', "11111111
+", "some bacteria", "NC_000000") == 0 ) ? 0 : 1;

END { $db->disconnect }