Lines Matching defs:eq
4 unless ("A" eq pack('U', 0x41)) {
412 if ($vbl eq 'non-ignorable') {
419 $vbl eq 'blanked' ? $wt[3] : $wt[0]);
421 elsif ($vbl eq 'blanked') {
426 $vbl eq 'shifted' && $wt[0]+$wt[1]+$wt[2] ? Shift4Wt : 0);
730 sub eq { $_[0]->getSortKey($_[1]) eq $_[0]->getSortKey($_[2]) }
1029 my $code = ref $_[2] eq 'CODE' ? $_[2] : FALSE;
1051 my $code = ref $_[2] eq 'CODE' ? $_[2] : FALSE;
1312 # where ->eq("Pe\x{4E00}rl", "Perl") is true
1485 =item C<$result = $Collator-E<gt>eq($a, $b)>
1499 eq : whether $a is equal to $b.
1659 $Collator->eq("perl", "PERL"); # false
1663 $Collator->eq("perl", "PERL"); # true
1667 $Collator->eq("perl", "PERL"); # false
1675 $Collator->change(level => 2)->eq("perl", "PERL"); # true
1677 $Collator->eq("perl", "PERL"); # true; now max level is 2nd.
1679 $Collator->change(level => 4)->eq("perl", "PERL"); # false