my $cgi = CGI->new();
my %parameter = $cgi->Vars();
my $file = $parameter{myfile};