perl制作网页（MIB浏览器）[求助]

perl制作网页（MIB浏览器）[求助]
while(1){ ###主要循环函数
$time_value_temp= strftime "%Y-%m-%d %H-%M-%S",localtime;
print("<strong>&nbsp;&nbsp;&nbsp; $count.&nbsp;&nbsp;&nbsp;&nbsp;(Operation Time:&nbsp;&nbsp;&nbsp; $time_value_temp)&nbsp;&nbsp;&nbsp; </strong>");
$result_value_temp=snmp_get();
print("<strong>$result_value_temp &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</strong><br>");
$result_value=join("",$result_value,"(",$count,".",")","Result=>",$result_value_temp_2,"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;(Operation Time:",$time_value_temp,")","<br>");
$count=$count+1;
sleep($inter_time);
$result_value_temp="";
}

InsertDB(); #子函数写入数据库
$cgi->end_html;
$cgi=CGI->close;


小弟现在做毕业设计，设计一个MIB浏览器，这是一个实时监控的页面，通过while(1)不停的获取并输出在网页上
输出什么都不成问题了，现在就是不知道怎么让它停下来，比如当按后退的时候虽然进入了其它页面，但还是不停的发送snmp数据包，perl中是否可以像javascript一样响应onclick事件，或是采取其它方法使其退出并写了数据库，环境为windows2003+iis6.0系统


急求，先谢谢个位大大了。。。

   

因为你已经while(1)了，基.
因为你已经while(1)了，基本上，不可能停下来了。
除非httpd超时。

建议你换个做法。在html页面使用js刷新页面
当浏览器停止的时候，也就不刷新了。