$filename = $query->param('uploaded_file');
while (<$filename>) {
  print;
  }