Help for this page

Select Code to Download

Select or download this

sub filter {
   die 'Error: no fields to filter through' if (@_ < 2);
   my $response = shift;
...
     }
     return \@filtered_responsearr;
    }