Skip to content

Commit 722b777

Browse files
committed
Add handy comment
1 parent eaa9464 commit 722b777

File tree

1 file changed

+1
-0
lines changed

1 file changed

+1
-0
lines changed

bin/mech-test

+1
Original file line numberDiff line numberDiff line change
@@ -33,6 +33,7 @@ if ( $mech->status eq '200' ) {
3333
for my $i ( 0 .. @quiz - 1 ) {
3434
my $question_num = $mech->scrape_text_by_id('question_num');
3535

36+
# Get the first pipe separated item of the question, then take the last space separated item
3637
my $inv = ( split /\s+/, ( split /\|/, $quiz[$question_num] )[0] )[-1];
3738
3839
my $answer;

0 commit comments

Comments
 (0)