my $text = $cgi->param('text') || <