note blue_cowdawg <ul><ul><i> </i></ul></ul> <p> <code> use strict; opendir(INDIR,"/path/to/directory/with/files") or die $!; while (my $fname = readdir(INDIR)){ next unless $fname =~ m@\.txt$@; open FIN," < $fname" or die "$fname: $!"; my @stuff=<FIN>; close FIN; #process lines.... } </code> There's another way of doing it. </p> <div class="pmsig"><div class="pmsig-72516"> <hr> <font size="-2"> Peter L. Berghold -- Unix Professional<br> Peter -at- Berghold -dot- Net; AOL IM redcowdawg Yahoo IM: blue_cowdawg<br> </font> </div></div> 1003832 1003832