Dera Sharat and Georg, Error message after "extract.pl" is (should be put in the last message) CASE_22 readline() on closed filehandle SCF at ../perl/extract.pl line 71. Use of uninitialized value in multiplication (*) at ../perl/extract.pl line 63. Hiromasa