Select Code to Download

$snp{'Gene1'}{'Trans1'}{'color'} = 'blue';

my $snp1  = SNP->new(id => 'SNP1');
my $gene  = $snp1->addGene('Gene1');
my $trans = $gene->addTranscript('Trans1');
$trans->setProp(big   => 1);