Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight

Wildcard for key in hash lookup to skip over level

by ZWcarp (Beadle)
on Dec 04, 2012 at 17:33 UTC ( #1007127=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
     use strict;
    use Data::Dumper;
    my %Gene_overlap;
                        else {print "\t0\n";} # prints 0 if no gene/positi
    +on found 
                else {print $_ . "\t0\t0\n";} #if no gene overlap
  2. or download this
    005    1    17085712    C    S     MST1P9
    006    1    17085712    C    S     MST1P9
    006    1    17085713    C    S     MST1P9
    007    1    17085712    C    S     MST1P9
    006    1    17085713    C    S     MST1P9
    006    1    17085713    C    S     MST1P9

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1007127]
Approved by GrandFather
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2018-07-16 16:41 GMT
Find Nodes?
    Voting Booth?
    It has been suggested to rename Perl 6 in order to boost its marketing potential. Which name would you prefer?

    Results (344 votes). Check out past polls.