11 'shakespeare, "(william)"',
31 my ($expected, @mismatch);
41 = buildQuery( $_->{operators}, $_->{operands}, $_->{indexes}, $_->{limits}, $_->{sort_by}, 0, $_->{lang} );
45 $expected = $_->{query};
46 push @mismatch, "Query: $query (not: $expected)" unless $query eq $expected;
48 $expected = $_->{simple_query};
49 push @mismatch, "Simple Query: $simple_query (not: $expected)" unless $simple_query eq $expected;
51 $expected = $_->{query_cgi};
52 push @mismatch, "Query CGI: $query_cgi (not: $expected)" unless $query_cgi eq $expected;
54 $expected = $_->{query_desc};
55 push @mismatch, "Query desc: $query_desc (not: $expected)" unless $query_desc eq $expected;
57 $expected = $_->{limit};
58 push @mismatch, "Limit: $limit (not: $expected)" unless $limit eq $expected;
60 $expected = $_->{limit_cgi};
61 push @mismatch, "Limit CGI: $limit_cgi (not: $expected)" unless $limit_cgi eq $expected;
63 $expected = $_->{limit_desc};
64 push @mismatch, "Limit desc: $limit_desc (not: $expected)" unless $limit_desc eq $expected;
66 $expected = $_->{query_type};
67 push @mismatch, "Query Type: $query_type (not: $expected)" unless $query_type eq $expected;
69 die map "$_\n", @mismatch if @mismatch;