Calculate ATGC percentage in parallel with perl
#!/usr/bin/perl use strict; use Parallel::For...# hash to resolve PID's back to child specific information my $p...); # Setup a callback for when a child finishes up so we can # ge...0.5 ); NAMES: foreach my $child ( 0 .. $#names ) { my $p...2654 days ago
Genetic Algorithms demonstration with word DNA in Perl
#!/usr/bin/perl -w # GA demonstration with word DNA (512 bits)...= @parent_population[int(rand($pop_size))]; my $child = { survived => 1, parent =>...one random byte from the parents and add it to the child vec($child->{dna}, $byte-...2369 days ago
Biological Sequence handling with Perl !
package Sequence::Generic; # File: Sequence/Generic.pm use strict; use Carp; use ove...atenate', 'fallback' => 'TRUE'; # These methods should be overriden by child classes # class constructor...2179 days ago