Select Code to Download

use vars qw/ $VERSION @ISA @EXPORT @EXPORT_OK /;

@EXPORT_OK = qw/ file_handle file_name file_type mime_magic mime_type/
+;

  use CGI::Upload qw(file_name);