Help for this page

Select Code to Download


  1. or download this
    sub count_support_mismatch {
        my( $hashref, $arref, $d ) = @_;
    ...
        }
        return $counter;
    }
    
  2. or download this
    P:\test>459758
    GGAA|GGGG|TTTT
    ...
    Hamming 'GGGA' <=> 'GGGG'
    Hamming 'GGGA' <=> 'GGGG'
    Support = 3
    
  3. or download this
    sub count_support_mismatch {
        my( $hashref, $arref, $d ) = @_;
    ...
        }
        return $counter;
    }
    
  4. or download this
    P:\test>459758
    GGAA|GGGG|TTTT
    ...
    Hamming 'GGGA' <=> 'GGGG'
    Hamming 'GGGA' <=> 'GGGG'
    Support = 3
    
  5. or download this
    P:\test>459758
    GGAA|GGGG|TTTT
    ...
    Hamming 'GTTT' <=> 'GGGG'
    Hamming 'GTTT' <=> 'GGGG'
    Support = 4