Select Code to Download

#------------------------------------------------------
# Handle all POST, GET, multipart, and upload requests
...
}
my $upload = $apr->upload;
if ($upload) { $params{'import_file'} = $upload; }

$VAR1 = {
          'file_handler' => bless( \*Apache::Upload::_GEN_2410, 'Apach
+e::Upload' ),
          'import_file' => bless( do{\(my $o = 447703164)}, 'Apache::U
+pload' ),
        };