Skip to content

Instantly share code, notes, and snippets.

@coela

coela/gist:1205275

Created September 9, 2011 01:33
Show Gist options
  • Save coela/1205275 to your computer and use it in GitHub Desktop.
Save coela/1205275 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
use G;
use 5.12.4;
my $gb = load('ecoli');
$gb->{$_}->{product} = '' for $gb->cds();
for ($gb->cds()){
my $l = length $gb->{$_}->{translation};
$gb->{$_}->{product} = 'ribosomal fucking protein' if $l >=500;
}
say Dumper w_value ($gb);
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment