<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=us-ascii">
<META content="MSHTML 6.00.2900.3132" name=GENERATOR></HEAD>
<BODY>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2>Hi,</FONT></SPAN></DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New" size=2>I am getting
a "Too many open files" error when the program attempts to open a file. I
have checked the logic and it appears that there is a corresponding close()
for every open(). I don't know why Perl is warning me with this
error.</FONT></SPAN></DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New" size=2>I am
wondering if there is a way to check how many files are open while in debug
mode.</FONT></SPAN></DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New" size=2>I would
appreciate any comments.</FONT></SPAN></DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2>Thanks.</FONT></SPAN></DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2></FONT></SPAN> </DIV>
<DIV><SPAN class=475104116-21062007><FONT face="Courier New"
size=2>Peter</FONT></SPAN></DIV></BODY></HTML>