Help for this page

Select Code to Download


  1. or download this
    NAME    NUMBER    COLOR
    GNAEUS    1    BLUE
    ...
    FABIUS      2    YELLOW
     FABIUS    1    RED
    ....
    
  2. or download this
    undef my %hash;
    open IN, $ARGV[0];
    ...
        my ($name,$number,$color) = split /\t/, $_;
        $hash{$name}{$number}{$color}++;
    }
    
  3. or download this
     
    my %returnedHash = grep / $hash{"GNAEUS"}{"1"} / keys %hash; 
    
    ...
            }
        }
    }