Script needed.

[Deepak Kulkarni]

Hi all..

I would like to write perl/shell script for the below requirement.

1) Read line by line words from a file.
2) Search that word in multiple directories
3) If it finds that word in any file, log that filename with the full path into an output file.

Thanks
DK

[Marvin Strong]

for word in `cat file`
do
grep $word /list/* /of/dirs/* | awk -F: '{print $1}' > logfile
done

[Marvin Strong]

oops need >> or to redirect after the done.


for word in `cat file`
do
grep $word /list/* /of/dirs/* | awk -F: '{print $1}' >> logfile
done

[Victor Fridyev · Accepted solution]

#!/bin/sh

cat file | while read string; do
for word in $string; do
find dir1 dir2 dir3 -exec grep -l $word {} \;
done #for
done > logfile

[spex]

Hi DK,

For a different approach...

#!/usr/bin/sh
F_IN=/your/file
F_OUT=/your/results
tr -s "[:space:]" "[\n*]" < ${F_IN} > /tmp/wl.${$}
find / -print | grep -F -f /tmp/wl.${$} > ${F_OUT}
rm -f /tmp/wl.${$}
exit

PCS

[Arturo Galbiati]

Hi,
a one-line command:

grep -l -f file /dir1/dir1/* /dir2/dir/*

This command print only the fullpatchname of teh file where the search string conatined into file are found.

this run on my HP-UX11i.

HTH,
Art

[Deepak Kulkarni]

Hi Everybody...

Thanks to everyone...

Cheers
DK