1. Print the passed in parameters to the console, and/or
2. Supply the values in the CGI and check the script output (shown below)

.
.
.
my ($grp1,$grp2,$grp3) = qw{ Correct1 Incorrect2 Correct3}; # explicit
+ values

# $grp1 = param('grp1');  # passed in values
# $grp2 = param('grp2');
# $grp3 = param('grp3');


if ($grp1 eq "Correct1" )
{
print p("Question One Is $grp1");
}
elsif ($grp1 eq"Incorrect1")
{
print p(" Question One is $grp1");

}



if ($grp2 eq "Correct2")
{
print p("Question One Is $grp2");
}
elsif ($grp2 eq"Incorrect2")
{
print p(" Question One is $grp2");

}


if ($grp3 eq "Correct3")
{
    print p("Q3 is $grp3" ) ;
}
elsif ($grp3 eq "Incorrect3")
{
    print p("q3 is $grp3");
}


__output__
Content-Type: text/html; charset=ISO-8859-1

<p>Question One Is Correct1</p><p> Question One is Incorrect2</p><p>Q3
+ is Correct3</p>
[download]

I know these are basic tips, but basic things can get easily overlooked.