<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<META content="MSHTML 6.00.6000.16608" name=GENERATOR>
<STYLE>@font-face {
        font-family: 宋体;
}
@font-face {
        font-family: Verdana;
}
@font-face {
        font-family: @宋体;
}
@page Section1 {size: 595.3pt 841.9pt; margin: 72.0pt 90.0pt 72.0pt 90.0pt; layout-grid: 15.6pt; }
P.MsoNormal {
        TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify
}
LI.MsoNormal {
        TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify
}
DIV.MsoNormal {
        TEXT-JUSTIFY: inter-ideograph; FONT-SIZE: 10.5pt; MARGIN: 0cm 0cm 0pt; FONT-FAMILY: "Times New Roman"; TEXT-ALIGN: justify
}
A:link {
        COLOR: blue; TEXT-DECORATION: underline
}
SPAN.MsoHyperlink {
        COLOR: blue; TEXT-DECORATION: underline
}
A:visited {
        COLOR: purple; TEXT-DECORATION: underline
}
SPAN.MsoHyperlinkFollowed {
        COLOR: purple; TEXT-DECORATION: underline
}
SPAN.EmailStyle17 {
        FONT-WEIGHT: normal; COLOR: windowtext; FONT-STYLE: normal; FONT-FAMILY: Verdana; TEXT-DECORATION: none; mso-style-type: personal-compose
}
DIV.Section1 {
        page: Section1
}
BLOCKQUOTE {
        MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px; MARGIN-LEFT: 2em
}
OL {
        MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px
}
UL {
        MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px
}
</STYLE>
</HEAD>
<BODY>
<DIV><FONT face=Verdana color=#0000ff size=2>把内存回收交给系统还是比较放心的</FONT></DIV>
<DIV><FONT face=Verdana size=2></FONT>&nbsp;</DIV>
<DIV align=left>
<DIV align=left><FONT face=Verdana size=2>
<HR style="WIDTH: 122px; HEIGHT: 2px" SIZE=2>
</FONT></DIV>
<DIV><FONT color=#c0c0c0><FONT face=Verdana 
size=2><SPAN>ximiff</SPAN></FONT></DIV>
<DIV><FONT face=Verdana size=2>2008-03-06</FONT></FONT></DIV></DIV>
<DIV><FONT face=Verdana size=2>
<HR>
</FONT></DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>发件人:</STRONG> 
rorot</FONT></FONT></DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>发送时间:</STRONG> 
2008-03-06&nbsp;11:50:17</FONT></FONT></DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>收件人:</STRONG> 
china-pm@pm.org</FONT></FONT></DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>抄送:</STRONG> </FONT></FONT></DIV>
<DIV><FONT face=Verdana><FONT size=2><STRONG>主题:</STRONG> Re: 
[PerlChina]perl的内存管理问题。</FONT></FONT></DIV>
<DIV><FONT face=Verdana size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Verdana size=2>谢谢以上诸位。<BR><BR>如Tiger 
peng所说,我暂时这么解决,每隔1000个pages作为一个Process来处理。然后退出,再启动一个新的Process,如此循环。<BR><BR>PS. 
我的HTML::DOM是最新版本。0.010 (Alpha).<BR><BR>rorot <BR><BR>
<DIV class=gmail_quote>2008/3/6 tiger peng &lt;<A 
href="mailto:tigerpeng2001@yahoo.com">tigerpeng2001@yahoo.com</A>&gt;:<BR>
<BLOCKQUOTE class=gmail_quote 
style="PADDING-LEFT: 1ex; MARGIN: 0pt 0pt 0pt 0.8ex; BORDER-LEFT: rgb(204,204,204) 1px solid">
  <DIV>
  <DIV 
style="FONT-SIZE: 10pt; FONT-FAMILY: courier,monaco,monospace,sans-serif">
  <DIV 
  style="FONT-SIZE: 10pt; FONT-FAMILY: courier,monaco,monospace,sans-serif">1, 
  Check if your HTML::DOM version. Should it be updated?<BR>2, Sample 
  workaround: Do not 解析 too many pages in one process: stop and restart the 
  process for every 1 ~ n pages.<BR><BR>
  <DIV 
  style="FONT-SIZE: 12pt; FONT-FAMILY: times new roman,new york,times,serif">
  <DIV class=Ih2E3d>----- Original Message ----<BR>From: rorot &lt;<A 
  href="mailto:yang.liana@gmail.com" 
  target=_blank>yang.liana@gmail.com</A>&gt;<BR>To: <A 
  href="mailto:China-pm@pm.org" target=_blank>China-pm@pm.org</A><BR>Sent: 
  Friday, February 29, 2008 8:10:32 PM<BR>Subject: [PerlChina] 
  perl的内存管理问题。<BR><BR>大家好,<BR>&nbsp;&nbsp;&nbsp; <BR></DIV>
  <DIV class=Ih2E3d>&nbsp;&nbsp;&nbsp; 我用perl的HTML::DOM 
  解析约7万个HTML页面内容。结果发现没解析2,000个左右,脚本程序就出现一次崩溃。错误信息为内存占用过多,被操作系统杀死。<BR><BR>&nbsp;&nbsp;&nbsp; 
  我不知道如何去DEBUG一个perl脚本,跟踪到底那部分没有释放内存。但是可以肯定的是我的程序是运行一个sub foo()循环,这个sub里的new 
  Object()都被我调用过object-&gt;close(),也就是文档里说的destroy操作。为什么持续运行程序,内存暴涨,从10M一直上升到580MB然后被操作系统杀死。。。<BR><BR>&nbsp;&nbsp;&nbsp; 
  能告诉我如何去调试一个perl程序, 或者直接找出那里出现内存泄露吗? 或者还是perl的内存管理释放内存的时间太慢???<BR><BR>rorot 
  <BR>Mar/01/2008<BR><BR></DIV>
  <DIV><BR><BR>-----Inline Attachment Follows-----
  <DIV 
  class=Ih2E3d><BR><BR>_______________________________________________<BR>China-pm 
  mailing list<BR><A href="mailto:China-pm@pm.org" 
  target=_blank>China-pm@pm.org</A><BR><A 
  href="http://mail.pm.org/mailman/listinfo/china-pm" 
  target=_blank>http://mail.pm.org/mailman/listinfo/china-pm</A></DIV></DIV></DIV><BR></DIV></DIV></DIV><BR>_______________________________________________<BR>China-pm 
  mailing list<BR><A href="mailto:China-pm@pm.org">China-pm@pm.org</A><BR><A 
  href="http://mail.pm.org/mailman/listinfo/china-pm" 
  target=_blank>http://mail.pm.org/mailman/listinfo/china-pm</A><BR></BLOCKQUOTE></DIV><BR></FONT></DIV></BODY></HTML>