Help for this page

Select Code to Download


  1. or download this
    my %lu = map {$_ => 1} @array;

foreach my $key (keys %H){
    if ($lu{$key}) {
  2. or download this
    foreach my $elt (@A){
    if (exists $hash{$elt}) {