Sara has asked for the wisdom of the Perl Monks concerning the following question:

Hello monks , I have this problem ,, I am trying to modify files based on thier location on the tree : the tree 
-one.bld
 -two.bld
  -three.bld

[download]
so I want to read through the directory containing these .bld files and check the third line of each file , so if i am inside the one.bld the third line should be program if not I need to change it , if i am inside the two.bld then third line should be subprogram and the three.bld should have the word library . the file looks like this right now : 
#!build
default:
    nobuild
    :cx_e_option=msgnumbers
    :dependency=nodepend

[download]
all of them containg the word nobuild which I want to change to either program , subprgram or library based on there location on the tree. I am not sure how to start this one and be able to go through the tree , can someone give me a hint ,, thanks

Replies are listed 'Best First'.
Re: subfiles
by fglock (Vicar) on Aug 26, 2002 at 16:16 UTC

    I'd write a script that takes 2 parameters: a word and a files selection, then call it like this:

    myscript.pl program ./* 
myscript.pl subprogram ./*/*
myscript.pl word ./*/*/*

    [download]

    writing myscript.pl is left as an exercise for the reader :)

[reply]
[d/l]

Back to Seekers of Perl Wisdom