Wrote extract_column_subset.pl