if ($ENV{CONTENT_LENGTH} > 1024*1024) {
    die "Content length too long";
}