Help for this page

Select Code to Download

Select or download this
```
my @strings = ($genome1, $genome2);
```

Select or download this

#! perl -sw
use strict;
...
  $total += length($_) - $p for @$strings; # And here!
} while( $total > 0 );
__END__