Help for this page

Select Code to Download


  1. or download this
    for ($results = 2; $results <34; $results++) {
                my $file="current$results.res";
    ...
                  ....
                }
    
  2. or download this
    for ($results = 2; $results <34; $results++) {
                    my $file="current".$presence.".res";
                    ....
                    }
    
  3. or download this
     @tree1=@samples[0..2];
      ...  (another 10 of those)
    ...
     foreach $patch(@$arrayname) {
           ... do something
           }
    
  4. or download this
     my %trees = (1 => "@samples[0..2]", 
                              ... (another 10 of these)
    ...
                    foreach $patch(@patches) {
                                 ... do something
                     }