print "A";
print "B";
prompt("Question1:", "", "Wrong answer try again:");
print "C";
print "D";

sub prompt {
   # same as above excpet I commented out the if $validator-> part

}