We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent eaa9464 commit 722b777Copy full SHA for 722b777
bin/mech-test
@@ -33,6 +33,7 @@ if ( $mech->status eq '200' ) {
33
for my $i ( 0 .. @quiz - 1 ) {
34
my $question_num = $mech->scrape_text_by_id('question_num');
35
36
+ # Get the first pipe separated item of the question, then take the last space separated item
37
my $inv = ( split /\s+/, ( split /\|/, $quiz[$question_num] )[0] )[-1];
38
39
my $answer;
0 commit comments