How can I run this script on all .sh in all subdirectories?

jimdaworm · 02-25-2008, 10:36 AM

Hi everyone I know little about perl or bash but need to run this script on all .sh files in all subdirectories.

Any ideas?

I thought maby I could us find to somehow pipe this info to the script but am not sure how to do this.

Quote:

!/usr/bin/perl

die "Usage: $0 < files >\n" unless @ARGV;

for $file (@ARGV)
{
open IN, $file or die "$0: Cannot open $file for input!\n";

my @lines = <IN>;

close IN;
open OUT, "> $file" or die "$0: Cannot open $file for output!\n";

s/\r$// for @lines;
print OUT for @lines;
}

slakmagik · 02-25-2008, 10:43 AM

dunno perl, but

Code:

find PATH/YOU/WANT -name '*sh' -exec your_perl_thing {} +

should do - but it looks like the perl thing just checks to see if a file is readable? You could do that with find alone, using the permissions tests. But I'm probably not following the perl thing.

-- Oh, I meant to note that this assumes all your shell scripts actually end in 'sh'. (Mine don't as a rule.) If you really have shell scripts scattered all over rather than in a particular directory, I guess you'd need to 'file' them, too.

jimdaworm · 02-25-2008, 12:16 PM

Thanks a lot for your help, thats what I was sort of thinking of and it worked

chrism01 · 02-25-2008, 06:46 PM

Looks like you're trying to get rid of MS (DOS) style line endings, in which case the dos2unix util is what you want.
man dos2unix