hi all, i am new to this group. hope get maximum benifit out of this group. currently i am writting a script wherein i hav to creat a temporary file in each sub directory starting from main dir and write in to that file
i hav to expand each make file within each sudirectory and place that temp file there itself i tried following sub1{ ...... $path=$mainpath.$tempfile open(FD,">$path") printfile($path,*FD); .... } sub printfile{ $fileloc=SHIFT $filpediscriptor=SHIFT; here i cal a readfile routine which returns me the contents of file in array @lines for each line($line) in array i do the following for( for ech $line of @lines){ check if it contains include stmt if so { get that include file loc and pass it to printfilesubroutin printfile($includefileloc , *$filpediscriptor); } else { write content of makefile to temp file creatred in each subdirectory print $filediscriptor , $line } close($filediscriptor); } the probleem here the temporary file created in each subfolder is not complete it is truncated. am passing the file discriptor currectly in recursive subroutine i thank u all in advance regards sid --------------------------------------------------------------------------------------------------------------------------------- "There is nothing in a caterpillar that tells you it's going to be a butterfly." - Anonymous