Help for this page

Select Code to Download


  1. or download this
    sub gen_std_filter_for {
    my ($type, $transform) = @_;
    return sub {
        my $instr;
        local @components;
        for (extract_multiple($_,$extractor_for{$type})) {
  2. or download this
    use Data::Dumper;
warn Dumper( [ $_, $extractor_for{$type} ] );