question=When driving towards a bright setting sun, glare can be reduced by
option1=closing one eye
option2=dipping in the interior mirror
option3=wearing dark glasses
option4=looking sideways
answer=4
answertext=Dark glasses are often used as a fashion item but they do have their practical uses. Low sun in the early morning or evening can dazzle and distract. Lessen the risk by reducing the glare. Wear dark glasses if they help you to see better. 
category1=car
category2=vechicle handling

##</code><code>##

sub get_std_test { 
  die +(caller(0))[3].' cannot be called in void context' 
    if not defined wantarray; 

  $/ = "===\n";   # set our delimiter  
  
  my %config = mcas::get_config(); # returns a hash of all config vars
  my $count = 0; 
  my @questions; 

  open QUESTIONS, '<questions' or die "Cannot open QUESTIONS file: $!"; 
  while (<QUESTIONS>) {
    if (rand($.) < 1) { 
      if ($count == $config{num_questions_per_test}) { 
        last; 
      } else { 
        push @questions, $_; 
        $count++
      }
    }
  } 
  close QUESTIONS;
  
  die "\$count = $count, < num_questions_per_test config var" 
    if ($count < $config{num_questions_per_test}); 

  return @questions; 
}