Select Code to Download

my $code = "";
map { $code .= $_} (@{$self->{GENES}});

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

for my $i (0 .. $self->{SIZE}) {
      my $individual = Individual->new();
      $individual->create();
      push (@{$self->{INDIVIDUALS}}, $individual); 
}

push (@{$self->{INDIVIDUALS}}, Individual->new->create) for 0..$self->
+{SIZE};

$self->{INDIVIDUALS} = [ map {Individual->new->create} 0..$self->{SIZE
+} ];