# Get the name of the file and an 
  #  open file handle to the file contents
  $filename = $query->param('uploaded_file');

  # Read a text file and print it out
  while ($line = <$filename>) {
    print $line;
  }