my $user_name = $q->param('user_name'); my $gender = $q->param('gender'); my $real_name = $q->param('real_name'); #### =deadcode # production version my $user_name = $q->param('user_name'); my $gender = $q->param('gender'); my $real_name = $q->param('real_name'); =cut # test version my $user_name = "Mary"; my $gender = "Queen"; my $real_name = "She Who Must Be Obeyed";