Help for this page

Select Code to Download


  1. or download this
     my ($span, %matches) = @_;
     my ($site, $fastaseq, $fasta, $sitekey) = '';
    ...
                print "\$hit is: ",$matches{$fastaseq}{$sitekey}[$hit],"\n
    +";
                if ($hit >= $lowerlimit && $hit <= $upperlimit) { #some co
    +de
    }}}}}
    
  2. or download this
    $matches{>LG_XIV}{0} is: ARRAY(0x182bb14)
    Use of uninitialized value in print at MyScript line 386.
    $hit is: 
    $hit is: 6906413
    Use of uninitialized value in numeric ge (>=) at MyScript line 388.