[PerlChina] Re: xml::parser

可以看一下那一次 eval 的结果信息，用正则来比对一下警告内容：

190  if ($err) {
191    $expat->release;
192    die $err;
193  }

可以改掉：
第 190 行加上额外的判断 if ($err !~ /.../ )
--~--~---------~--~----~------------~-------~--~----~
您收到此信息是由于您订阅了 Google 论坛"PerlChina Mongers 讨论组"论坛。
 要在此论坛发帖，请发电子邮件到 perlchina@googlegroups.com
 要退订此论坛，请发邮件至 perlchina+unsubscribe@googlegroups.com
 更多选项，请通过 http://groups.google.com/group/perlchina?hl=zh-CN 访问该论坛

-~----------~----~----~----~------~----~------~--~---