for ($i=1; $i<=5; $i++) {
      if ($q->param("file$i")) {
      }
}