Help for this page

Select Code to Download


  1. or download this
    $table=[[1,2,3],[a,b,d],[A,D,C]];
    
  2. or download this
    @answers = grep { $_->[0] =~ /a/i && $_->[2] =~ /C/} @$table;
    
  3. or download this
    %search_elements=(0=>a,2=>C);
    
    ...
        return 1; # ok all match
        
    }