just a quick sidenote ... you might want to check the return value of your calls to open. The standard idiom goes like this: open IN, $filename or die "Couldn't open file '$filename' for reading: $!";

-- Hofmator