JasLC: That filkemask would give you all files in the directory. Is that what you want?

Then the pseude-code would look like this:
code:
$array=dirlist('path2dir\*.*)
for each $file in $array
open(1,$file)
for $a=1 to 3
$line=readline(1)
next
close(1)
? $line
next



[ 16 July 2002, 23:41: Message edited by: sealeopard ]
_________________________
There are two types of vessels, submarines and targets.