for my $i (0..$#$commands_run) {
    print "$i: '$commands_run[$i]' =~ /$commands[$i]/";
    print $commands_run[$i] =~ /$commands[$i]/ ? ", Yes" : ", No";
    print "\n";
};