dgrep - Wrapper around gnu find & grep

Category:	Utility Scripts
Author/Contact Info	Thomas Klausner domm AT zsi.at
Description:	I just cannot remember how to run `find` and `grep` together. After reading the FM once too often, I wrote this small wrapper.. Pass it a pseudo-regex (to match the files) and another one to look for in all files. Example: `% dgrep .pm foo` Will look for "foo" in all files ending in ".pm" in the current and lower directories. Edited: ~Tue Jul 23 15:24:49 2002 (GMT), by footpad: Added <code> tags to the code.
#!/usr/bin/perl -w $\|=1; my ($findin,$grepfor)=@ARGV; my $in=qq(find -name '*$findin' -exec grep -Hn '$grepfor' {} \\;); print `$in`;

Comment on dgrep - Wrapper around gnu find & grep Download Code
Re: dgrep - Wrapper around gnu find & grep by jmcnamara (Monsignor) on Jul 22, 2002 at 21:08 UTC
I usually do something like this: `find . -name \.pm \| xargs grep foo` With `egrep` or `grep -E` as necessary. With `gnu` `find` the `.` isn't required. And with `gnu` `grep` you can also do the following (crude) recursive grep: `grep -rs foo ` There are probably other ways as well. -- John.	[reply] [d/l] [select]
Re: Re: dgrep - Wrapper around gnu find & grep by domm (Chaplain) on Jul 22, 2002 at 21:51 UTC
Ah, this `find . -name \*.pm \| xargs grep foo` is definitly nicer than what I was using. Thanks. (But I think I'll still use my wrapper...) `-- #!/usr/bin/perl for(ref bless{},just'another'perl'hacker){s-:+-$"-g&&print$_.$/}` [download]	[reply] [d/l] [select]
Re^2: dgrep - Wrapper around gnu find & grep by Aristotle (Chancellor) on Jul 22, 2002 at 22:17 UTC
Lest filenames with spaces, newlines or other funky bits in them trip you, you might want to get into the habit of coupling `find` and `xargs` with their respective nullbyte-termination parameters (see manpages): `find . -name \.pm -print0 \| xargs -0 grep foo` `____________` Makeshifts last the longest.*	[reply] [d/l]