Help for this page

Select Code to Download


  1. or download this
    my($TN,$Question,$AnswerA,$AnswerB,$AnswerC,$AnswerD,$Correct)=...
  2. or download this
    foreach my $element(@Array){
   chomp $element;
   # define $STH as you did
   $STH->execute(split/\|/,$element,8);
}