output "CGI=HASH(0x80ca53c)" ?

[Maximilian Ronniger]

Hello,

first sorry for my english.

I have writen this script:

use strict;
use CGI;

my $out = CGI->new();
my $docoment = '/home/httpd/html/test/texttoedit.txt';

my $data = read_document();
print $out-> header( "text/html" ),
      $out-> start_html(-title  => "Test Test",-bgcolor => "#008080"),
      $out=> $data,
      $out-> end_html;
exit;


sub read_document {
    local $/;

    open(SOURCE, "<$docoment")|| die "Could not open file!!\n";
    $data = <SOURCE>;
    return $data;
    close SOURCE;
}

the problem is that it outputs this:

CGI=HASH(0x80ca53c) and the content of the  $docoment .

how do i remove the  CGI=HASH(0x80ca53c) from fhe output ?

Thank you

Maximilian
Vienna, Austria