Help for this page

Select Code to Download

Select or download this

         foreach my $o (keys %{$hash_pos{$id}->{$p}}){
                $hash_stop{$p}->{$o}=1;