@input{$q->param()}=();
$input{$_} = $q->param($_) for keys %input;