my $filename = $q->param("filename");
&uploadFile("$filename");