Select Code to Download

$CGI::POST_MAX
 If set to a non-negative integer, this variable puts a
...
 An attempt to send a POST larger than $POST_MAX bytes
 will cause param() to return an empty CGI parameter list.
 You can test for this event by checking cgi_error(),

METHOD: {
   # avoid unreasonably large postings
...
      last METHOD;
   }
}

if (($POST_MAX > -1 ) && ($content_length > $POST_MAX))