Aha! Another TCLUG-DEVEL question. ;-)

        # get an array of directory entries
	$datadir = "/home/user/data";
        opendir (D, $datadir);
        @entries = readdir(D);
        closedir(D);

Good luck,

Troy

mjn wrote:
> 
> I have a huge directory of config files for some majordomo lists, all of
> which have one line which I want to change.
> 
> Now I have been doing some perl scripting for awhile, i am still quite
> green, but it always seems to take me twice the time to code the script
> than would have been just to do the manual edit.
> 
> Anyone know an easy way to change all of these files?  It is going to have
> to involve some reg-exp because the variable is sender = owner-listname
> which needs to be changed to listname-owner.
> 
> The regexp manuevering isn't really a problem, I have something that will
> do that actually.  The place where I usually run into problems is the
> gathering of filenames and then the interaction with those files...
> 
> so anyone got a quick answer to this problem?
> 
> ____________________________
> Mike Neuharth
> ADCS Technology Specialist
> http://www.umn.edu/adcs
> 
> E-Mail          : mjn at umn.edu
> Page Mail       : 6126486512 at page.metrocall.com
> http://nifty.dsl.visi.com/
> ____________________________
> 
> ---------------------------------------------------------------------
> To unsubscribe, e-mail: tclug-list-unsubscribe at mn-linux.org
> For additional commands, e-mail: tclug-list-help at mn-linux.org

-- 
Troy Johnson   mailto:john1536 at tc.umn.edu   http://umn.edu/~john1536/
...I'm going to slap the faces right off of your skulls!
	-- CAJ

---------------------------------------------------------------------
To unsubscribe, e-mail: tclug-list-unsubscribe at mn-linux.org
For additional commands, e-mail: tclug-list-help at mn-linux.org