my $filename = $query->param("file_uploaded");
open(FH, "<$filename or die "cannot open!");

##</code><code>##

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