# code to match the stress regex
      $eval .= <<"      EOT";
            next unless /\$stress[$i]/o;
      EOT