Lines Matching refs:got
54 $try = "\@expect = $out; \@got = &soundex $in;";
57 if (@expect != @got)
61 print "# expected ", scalar @expect, " results, got ", scalar @got, "\n";
63 ") got (", join (', ', @got), ")\n";
67 while (@got)
70 $got = shift @got;
72 if ($expect ne $got)
76 print "# expected $expect, got $got\n";
85 $try = "\$expect = $out; \$got = &soundex ($in);";
88 if ($expect ne $got)
92 print "# expected $expect, got $got\n";