Readers,
I have a csv file (greater than 256 columns hence unable to open in
spreadsheet) of the following format:
column header1, column header2, column header3
1,0.0e0,0.0e0,5e-6
2,0.0e0,0.0e0,6e-7
3,0.0e0,0.0e0,0.0e0
I want to perform: "if column headerx contains only values of 0.0e0,
delete
> > This may work for you:
> >
> > #!/usr/bin/perl
> > use warnings;
> > use strict;
> > use Fcntl ':seek';
> >
> > @ARGV = 'somefile.csv';
> > $^I = '.back';
> >
> > my @headers = map 1, split /,/, <>, -1;
> > my @keep = ( undef ) x @headers;
> >
> > while ( <> ) {
> >chomp;
> >my @field
