Help for this page

Select Code to Download


  1. or download this
    parseNumericArgList($args{p}, 'pipeline', 1);
parseNumericArgList($args{o}, 'overlap', 1);
  2. or download this
    sub parseNumericArgList {

    my ($arg, $tag, $deflt) = @_;
...
    $ref->{$addNm} = $addVal;
    return $ref;
}
  3. or download this
    0  HASH(0x9e2930)
   'overlap' => 100
   'pipeline' => 1
...
3  HASH(0xd8ead0)
   'overlap' => 200
   'pipeline' => 3
  4. or download this
    foreach $run (@arrAllArgs) {
    foreach $ak (keys %{$run}) {
        $runArgs{$ak} = $run->{$ak};
    }
    processOne();
}