Help for this page

Select Code to Download


  1. or download this
    my %hash= (
        Group1 => 'ATG1,ATG2,ATG4,ATRG7',
...
        Group4 => 'ATG1,MAM2',
        Group5 => 'LSM2',
        );
  2. or download this
    use strict;
use warnings;
...
    delete $hash{$secondgroup};
}
print "FINAL HASH\n",Dumper \%hash;
  3. or download this
    FINAL HASH
$VAR1 = {
          'Group4' => 'ATG9,ATG2,ATRG7,ATG4,ATG1,MAM2',
          'Group5' => 'FYCO1,LSM2'
        };