Re: Bug#277595: unable to access files uploaded via forms from cgi scripts (perl)

[Martin Struwe <mastr@von-oertzen.org>]

use CGI 2.47 qw/:standard/;
$CGI::POST_MAX        = 1024 * 100;  # max 100 kbytes posts
$CGI::DISABLE_UPLOADS = 0;           # Allow uploads.

print $query->filefield(
    -name      => 'uploaded_file',
    -size      => 50,
    -maxlength => $CGI::POST_MAX,
    -accept    => 'text/*',
    );