my $filename = $query->param("file_uploaded");
while (<$filename>) {
 # do something
}