Select Code to Download

indexfile' => {
                         'GCTCAGGA' => '4',
                         'AGCGTAGC' => '5',
...
                         'AAGGAGTA' => '15',
                         'CCTCTCTG' => '8'
                       },

sub match_query(){
    my $indexfile = shift;
    my $queryseq     = shift;
...
    return $result
    
}

Use of uninitialized value in numeric comparison (<=>) at /Users/XXXXX
+X/Desktop/test.pl line 602.