#!/usr/bin/perl -wT use CGI qw/:standard/; use DBI; # resource limits $CGI:DISABLE_UPLOADS = 1; $CGI::POST_MAX = 1024;