foreach $key(sort {$a<=>$b} keys(%resultHoA)){
       $statushash{$resultHoA{$listcols[0]}[0]}='0';
    }