use CGI;
$cgi = CGI->new;
print "$cgi->textfield(-name=>'cgifield',-size=>'20')";
print qq/$cgi->textfield(-name=>'cgifield',-size=>'20')/;
print <<EOL;
$cgi->textfield(-name=>'cgifield',-size=>'20')
EOL

#all print CGI=HASH(0x...)