print start_form(
    -method  => 'post',
    -enctype => 'multipart/form-data',
    -action=> ''
  ),
  table( 
    ( map { upload_field( "upload$_" ) } ( '', 1 .. 3 ) ),
    Tr( td(), td( submit( 'button', 'submit' ), ) )
  ),
  end_form(), hr;