Perl-Sensitive Sunglasses | |
PerlMonks |
Re: match search string with column header, do some filtering with matched column, print lines/rows that match filter criteriaby CountZero (Bishop) |
on Jul 27, 2012 at 20:46 UTC ( [id://984099]=note: print w/replies, xml ) | Need Help?? |
What you are really doing is selecting records from a database with the criteria provided in another file. Everytime you think "database", think "DBI" and use the power of CPAN to make life easier for you. Look at the following: Output: This script fetches the filter conditions from the filter_file, stuffs it into a SQL::Abstract data-structure, constructs an SQL query out of it that combines all filters at once (the "where" part of the SQL is WHERE ( ( a <= ? OR c <= ? OR b = ? ) )) and then runs that SQL query against your input file. No repeated going through your input file; clean and fast code; easy to understand, maintain and change for anyone who knows the basics of SQL. A few caveats though:
CountZero A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James My blog: Imperial Deltronics
In Section
Seekers of Perl Wisdom
|
|