use CGI qw/:standard/;

# snip
       textarea(
                -name    => 'some_name',   
                -rows    => 10,           
                -columns => 50,           
                -wrap    => 'physical'    
            );

#or

filefield(-name=>'upload_file', -size=>60)


##</code><code>##

param('some_name'); # of text area

and

param('upload_file') # of file field