my $parm1 = $q->param('parm1') || '';