$cgi = bless( {
                '.r' => bless( do{\(my $o = '94118860562256')}, 'Apache2::RequestRec' ),
                'param' => {
                             'POSTDATA' => [
                                             'test'
                                           ],
                             'XForms:Model' => [
                                                 'test'
                                               ]
                           },
                'use_tempfile' => 1,
                '.fieldnames' => {},
                '.charset' => 'ISO-8859-1',
                'escape' => 1,
                '.parameters' => [
                                   'XForms:Model',
                                   'POSTDATA'
                                 ]
              }, 'CGI' );
$input = 'test';
$cgi_header = '';
$cgi_full_header = '';
$q = bless( {
              '.parameters' => [
                                 'XForms:Model',
                                 'POSTDATA'
                               ],
              'escape' => 1,
              '.fieldnames' => {},
              '.charset' => 'ISO-8859-1',
              'use_tempfile' => 1,
              '.r' => bless( do{\(my $o = '94118860562256')}, 'Apache2::RequestRec' ),
              'param' => {
                           'POSTDATA' => [
                                           ''
                                         ],
                           'XForms:Model' => [
                                               ''
                                             ]
                         }
            }, 'CGI' );
$q_header = '';
$q_full_header = '';