my $code = join('', @{$self->{GENES}});