Hum .. FYI - he is using CGI.pm ... He said that

$text=$query->param('message'); 

print  "..." , $text, "..." ;

dose work...
One thing I wonder is why print $query->param('message'); didn't work? It should. Now ... print "$query->param('message')"; dosen't work (note the quotes ") ..

I don't know the 'exact' reason for it, but basically what's happening is that Perl is not seeing that '->' is part of the variable itself. It has to do with how perl does it quoting. It having trouble doing full interpretation of the variable in that context.
Using: print "...", $query->param('message'), "..."; should work just fine .. I say should cause I normally use concatenation (put a period '.' instead of the commas ',') instead. Concatenation is slow if you keep doing it .. since it's just in a print, I don't think it shows anything down (at least nothing noticeable :) Any other questions?