# Load CGI.pm use CGI qw(:standard); $CGI::POST_MAX = 1024 * 100; $CGI::DISABLE_UPLOADS = 1; $CGI::HEADERS_ONCE = 1; my $query = new CGI; # Get inputs my $id = $query->param('id') || ''; my $handle = $query->param('handle') || '';