Select Code to Download

column relationship value num_or_string filter_or_append order
a      <=           0.3   num           filter           1
b      eq           abc   string        append           3
c      <=           0.3   num           filter           2

a     b     c
0.2   abc   0.3
...
0.1   abc   0.5
0.7   abt   0.7
0.1   abd   0.8

#!/usr/bin/perl

...
    }
}

if ((eval "$cells[$extract_col] $filter_array[$i][1] $filter_array[$i]
+[2]"))
            {
                print OUTFILE "$cells[$extract_col]", "\n";
            }

 if ((eval "$cells[$extract_col] $filter_array[$i][1] $filter_array[$i
+]
+[2]"))
            {
                print OUTFILE "$cells[$extract_col]", "\n";
            }