#### print start_multipart_form(), "Enter the file to process:", filefield('filename','',45), br, checkbox_group('count',\@types,\@types), p, reset,submit('submit','Process File'), endform; #### open (OUTFILE, ">/web/aps/mi/$name/$ver/$_") or die "Cannot open $name: $!";