use CGI; use CGI::Carp qw/fatalsToBrowser set_message/; #read more about these in the docs link above alarm($x); #if you wish, though I consider this a quick hack since a heavy server load may actually force your users to wait this long even though there is no infinite loop and still get the info they wanted cut off #### perl cgi.cgi