C:\>perl -MData::Dumper -MCGI -e"warn Dumper( $a=CGI->new );die Dumper(scalar $a->Vars() ) " a= b= c= d= e= f= g=
$VAR1 = bless( {
                 '.charset' => 'ISO-8859-1',
                 'a' => [
                          ''
                        ],
                 'escape' => 1,
                 'b' => [
                          ''
                        ],
                 'c' => [
                          ''
                        ],
                 'd' => [
                          ''
                        ],
                 'e' => [
                          ''
                        ],
                 'f' => [
                          ''
                        ],
                 'g' => [
                          ''
                        ],
                 '.parameters' => [
                                    'a',
                                    'b',
                                    'c',
                                    'd',
                                    'e',
                                    'f',
                                    'g'
                                  ],
                 '.fieldnames' => {}
               }, 'CGI' );
$VAR1 = {
          'a' => '',
          'b' => '',
          'c' => '',
          'd' => '',
          'e' => '',
          'f' => '',
          'g' => ''
        };