in reply to novie perl-CGI user
novitiate, all I can think of saying is, there are some small infelicities in your function that are probably not related to the problem you are having.
- I think you don't really want to prototype form() since it probably appears too late in your program anyway - so, remove the parens.
- You don't need to tell start_multipart_form() to use -enctype=>'multipart/form-data', because adding that parameter is about the only thing this alias for the start_form() function does.
- You can concatenate all of your consecutive print statements, using a comma (Replace the semi-colons with commas and remove the prints between). I suppose this might have a cost for building the string, but I can't imagine that it would be as expensive as calling print for every string fragment.
In Section Seekers of Perl Wisdom