use CGI qq(:standard);

print qq{
<sometag>
@{[textfield(-name=>'cgifield',-size=>'20')]}
<sometag>
};