## #!/usr/bin/perl use warnings; use strict; use CGI qw/:standard/; use CGI::Carp qw/fatalsToBrowser/; print header(); print start_html; for my $n (1..3){ print p("Question $n is ".param('grp'.$n)); } print end_html;