[aix-pm-cvs] modules/util csv.pl,1.45,1.46
Status: Alpha
Brought to you by:
gonter
|
From: Gerhard G. <go...@us...> - 2016-09-22 13:39:58
|
Update of /cvsroot/aix-pm/modules/util In directory sfp-cvs-1.v30.ch3.sourceforge.com:/tmp/cvs-serv28102 Modified Files: csv.pl Log Message: add option 'select' as an alias for 'search' which was not such a good name Index: csv.pl =================================================================== RCS file: /cvsroot/aix-pm/modules/util/csv.pl,v retrieving revision 1.45 retrieving revision 1.46 diff -C2 -d -r1.45 -r1.46 *** csv.pl 13 Sep 2016 11:52:19 -0000 1.45 --- csv.pl 22 Sep 2016 13:39:56 -0000 1.46 *************** *** 110,114 **** elsif ($opt eq 'out') { $out_file= $val || shift (@ARGV); } elsif ($opt eq 'find') { $find_pattern= $val || shift (@ARGV); } # TODO: allow multiple patterns! ! elsif ($opt eq 'search') { $search_string= $val || shift (@ARGV); } # TODO: allow multiple searches! elsif ($opt eq 'max') { $max_items= $val || shift (@ARGV); } elsif ($opt eq 'hdr') { $view= 'header'; } --- 110,117 ---- elsif ($opt eq 'out') { $out_file= $val || shift (@ARGV); } elsif ($opt eq 'find') { $find_pattern= $val || shift (@ARGV); } # TODO: allow multiple patterns! ! elsif ($opt eq 'search' || $opt eq 'select') ! { # TODO: allow multiple searches! ! $search_string= $val || shift (@ARGV); ! } elsif ($opt eq 'max') { $max_items= $val || shift (@ARGV); } elsif ($opt eq 'hdr') { $view= 'header'; } |