``…/Util.pm6`` :*155*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/ELIZABETH/List-Util/lib/List/Util.pm6#L155) |
@args.map(\*.Numeric).unique(:with(\&infix:\<==\>)).List |
| [FCO/Red``…/Operators.pm6`` :*19*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L19) |
multi infix:\<==\>(Red::AST $a, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L22) |
multi infix:\<==\>(Red::AST $a, Numeric() $b is rw) is export { |
| [FCO/Red``…/Operators.pm6`` :*25*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L25) |
multi infix:\<==\>(Red::AST $a, Numeric() $b is readonly) is export { |
| [FCO/Red``…/Operators.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L28) |
multi infix:\<==\>(Numeric() $a is rw, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*31*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L31) |
multi infix:\<==\>(Numeric() $a is readonly, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L53) |
multi infix:\<==\>(Red::AST $a, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*56*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L56) |
multi infix:\<==\>(Red::AST $a, Date $b is rw) is export { |
| [FCO/Red``…/Operators.pm6`` :*59*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L59) |
multi infix:\<==\>(Red::AST $a, Date $b is readonly) is export { |
| [FCO/Red``…/Operators.pm6`` :*62*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L62) |
multi infix:\<==\>(Date $a is rw, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*65*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L65) |
multi infix:\<==\>(Date $a is readonly, Red::AST $b) is export { |
| [FCO/Red``…/Operators.pm6`` :*427*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FCO/Red/lib/Red/Operators.pm6#L427) |
multi infix:\(Red::AST $a, Red::AST $b) is export is tighter(\&infix:\<==\>) { |
| [JEFFOBER/Math-Vector3D``…/README.md`` :*285*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JEFFOBER/Math-Vector3D/README.md#L285) |
### multi sub infix:\<==\> |
| [JEFFOBER/Math-Vector3D``…/README.md`` :*288*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JEFFOBER/Math-Vector3D/README.md#L288) |
multi sub infix:\<==\>( |
| [JEFFOBER/Math-Vector3D``…/Vector3D.pm6`` :*198*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JEFFOBER/Math-Vector3D/lib/Math/Vector3D.pm6#L198) |
multi infix:\<==\>(Math::Vector3D:D $v1, Math::Vector3D:D $v2 --\> Bool) is export { |
| [JGOFF/Perl6-Parser``…/19-operators.t`` :*2673*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JGOFF/Perl6-Parser/t/19-operators.t#L2673) |
# XXX "@a\<=='a'" illegal |
| [JGOFF/Perl6-Parser``…/19-operators.t`` :*2678*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JGOFF/Perl6-Parser/t/19-operators.t#L2678) |
my @a; @a \<== 'a' |
| [JGOFF/Perl6-Parser``…/19-operators.t`` :*2685*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JGOFF/Perl6-Parser/t/19-operators.t#L2685) |
}, Q{\<==}; |
| [JGOFF/Pod-To-HTMLBody``…/01-tree.t`` :*1340*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JGOFF/Pod-To-HTMLBody/t/01-tree.t#L1340) |
==\> and \<== |
| [JGOFF/Pod-To-HTMLBody``…/01-tree.t`` :*1347*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JGOFF/Pod-To-HTMLBody/t/01-tree.t#L1347) |
'\' '==\> and \<==' '\' |
| [JMASLAK/Net-BGP``…/AFI-SAFI.pm6`` :*27*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AFI-SAFI.pm6#L27) |
multi sub infix:\<==\>(Net::BGP::AFI-SAFI $a, Net::BGP::AFI-SAFI $b --\>Bool:D) { |
| [MATIASL/Pygments``…/perl.py`` :*80*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/MATIASL/Pygments/resources/perl.py#L80) |
(r'((?\<==\~)\|(?\<=\\())\\s\*/(\\\\\\\\\|\\\\[^\\\\]\|[^\\\\/])\*/[gcimosx]\*', |
| [MATIASL/Pygments``…/perl.py`` :*314*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/MATIASL/Pygments/resources/perl.py#L314) |
'not', '\<==', '==\>', '\<\<==', '==\>\>', |
| [MOZNION/Log-Minimal``…/Minimal.pm6`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/MOZNION/Log-Minimal/lib/Log/Minimal.pm6#L22) |
has Sub $.print is rw; # (DateTime :$time, Str :$messages, Str :$trace); \<== not yet implemented... |
| [MOZNION/Log-Minimal``…/Minimal.pm6`` :*23*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/MOZNION/Log-Minimal/lib/Log/Minimal.pm6#L23) |
has Sub $.die is rw; # (DateTime :$time, Str :$messages, Str :$trace); \<== not yet implemented... |
| [TBROWDER/Date-Names``…/lang-class.t`` :*23*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/resources/lang-class.t#L23) |
my @dow = \<\>; # \<== data set array values |
| [TBROWDER/Date-Names``…/lang-class.t`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/resources/lang-class.t#L33) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-de-lang-class.t`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-de-lang-class.t#L22) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-en-lang-class.t`` :*23*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-en-lang-class.t#L23) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-es-lang-class.t`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-es-lang-class.t#L26) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-fr-lang-class.t`` :*24*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-fr-lang-class.t#L24) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-id-lang-class.t`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-id-lang-class.t#L22) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-it-lang-class.t`` :*20*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-it-lang-class.t#L20) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-nb-lang-class.t`` :*20*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-nb-lang-class.t#L20) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-nl-lang-class.t`` :*23*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-nl-lang-class.t#L23) |
my @v = @::($n); # \<== interpolated from $n |
| [TBROWDER/Date-Names``…/007-ru-lang-class.t`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TBROWDER/Date-Names/t/007-ru-lang-class.t#L22) |
my @v = @::($n); # \<== interpolated from $n |
| [VRURG/IP-Addr``…/Addr.pm6`` :*605*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L605) |
multi infix:\<==\> ( IP::Addr:D $a, IP::Addr:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*609*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L609) |
multi infix:\<==\> ( IP::Addr:D $a, Str:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*613*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L613) |
multi infix:\<==\> ( Str:D $a, IP::Addr:D $b ) is export { |
| [WARRINGD/HTML-Canvas-To-PDF``…/render-pdf-test-sheets.pdf`` :*16316*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/HTML-Canvas-To-PDF/examples/render-pdf-test-sheets.pdf#L16316) |
x8CxxAC.B:xAAxADxEDxE6xBDgxEE�x89x85xA1xEFDG�"x91�Xx96�?\~\<x86axFCxFCxFCxAAxABxABx816xE0I5x97xF0xECxF5xC3\>x92S�N߬xEF�xC4xC0xB4xBB�uxx91 |
| perl6-all-modules/xA5xB4xB6xB6�x80T x9AcxEB�@�xA45<xCF����ΊxB02xA1ExC9e(x95xB0xE7CxDE7xE6xD0xCDxC7axC7xF2xC4 | ��xA89x8BxBExB9hx9AxEBxD11�xE5xF5;Jx95 |
| [FCO/Test-Fuzz``…/Generator.pm6`` :*33*:](https://github.com/FCO/Test-Fuzz/blob/3f11ed4813505ee6dc93309e59bd20e3f1d8fa47/lib/Test/Fuzz/Generator.pm6#L33) |
\<== map({.^name =\> lazy .generate-samples}) |
| [FCO/Test-Fuzz``…/Generator.pm6`` :*34*:](https://github.com/FCO/Test-Fuzz/blob/3f11ed4813505ee6dc93309e59bd20e3f1d8fa47/lib/Test/Fuzz/Generator.pm6#L34) |
\<== grep({try {lazy .generate-samples}}) |
| [FCO/Test-Fuzz``…/Generator.pm6`` :*35*:](https://github.com/FCO/Test-Fuzz/blob/3f11ed4813505ee6dc93309e59bd20e3f1d8fa47/lib/Test/Fuzz/Generator.pm6#L35) |
\<== @types |
| [Perl6-Noise-Gang/p6-Music-Helpers``…/Helpers.pm`` :*131*:](https://github.com/Perl6-Noise-Gang/p6-Music-Helpers/blob/c6b87cd817705eaa4afe2bd53b3895f6fa998f13/lib/Music/Helpers.pm#L131) |
multi infix:\<==\>(Note:D $lhs, Note:D $rhs) is export { |
| [Perl6-Noise-Gang/p6-Music-Helpers``…/Helpers.pm`` :*135*:](https://github.com/Perl6-Noise-Gang/p6-Music-Helpers/blob/c6b87cd817705eaa4afe2bd53b3895f6fa998f13/lib/Music/Helpers.pm#L135) |
multi infix:\<===\>(Note:D $lhs, Note:D $rhs) is export { |
| [andydude/p6-c-parser``…/Actions.pm6`` :*306*:](https://github.com/andydude/p6-c-parser/blob/8f277d3597d6fa72cc8b7276ac9f9eca8666ec9c/lib/C/Parser/Actions.pm6#L306) |
method equality-operator:sym\<==\>($/) { |
| [andydude/p6-c-parser``…/Grammar.pm6`` :*323*:](https://github.com/andydude/p6-c-parser/blob/8f277d3597d6fa72cc8b7276ac9f9eca8666ec9c/lib/C/Parser/Grammar.pm6#L323) |
rule equality-operator:sym\<==\> { \ } |
| [andydude/p6-c-parser``…/Lexer.pm6`` :*383*:](https://github.com/andydude/p6-c-parser/blob/8f277d3597d6fa72cc8b7276ac9f9eca8666ec9c/lib/C/Parser/Lexer.pm6#L383) |
token punct:sym\<==\> { \ } |
| [colomon/Math-Polynomial``…/Polynomial.pm`` :*45*:](https://github.com/colomon/Math-Polynomial/blob/be0c31dac06b5a5ff10c9018f66c835f60c19f29/lib/Math/Polynomial.pm#L45) |
multi sub infix:\<==\>(Math::Polynomial $a, Math::Polynomial $b) is export(:DEFAULT) { |
| [drforr/perl6-Perl6-Parser``…/19-operators.t`` :*2673*:](https://github.com/drforr/perl6-Perl6-Parser/blob/7cb505b318fd587ffbc90d66e73600b158a87b05/t/19-operators.t#L2673) |
# XXX "@a\<=='a'" illegal |
| [drforr/perl6-Perl6-Parser``…/19-operators.t`` :*2678*:](https://github.com/drforr/perl6-Perl6-Parser/blob/7cb505b318fd587ffbc90d66e73600b158a87b05/t/19-operators.t#L2678) |
my @a; @a \<== 'a' |
| [drforr/perl6-Perl6-Parser``…/19-operators.t`` :*2685*:](https://github.com/drforr/perl6-Perl6-Parser/blob/7cb505b318fd587ffbc90d66e73600b158a87b05/t/19-operators.t#L2685) |
}, Q{\<==}; |
| [grondilu/clifford``…/Clifford.pm6`` :*43*:](https://github.com/grondilu/clifford/blob/1d4905ce9c6a795caec90609d20db8131f2c0ed0/lib/Clifford.pm6#L43) |
multi infix:\<==\>(MultiVector $A, MultiVector $B) returns Bool is export { $A - $B == 0 } |
| [grondilu/clifford``…/Clifford.pm6`` :*44*:](https://github.com/grondilu/clifford/blob/1d4905ce9c6a795caec90609d20db8131f2c0ed0/lib/Clifford.pm6#L44) |
multi infix:\<==\>(Real $x, MultiVector $A) returns Bool is export { $A == $x } |
| [grondilu/clifford``…/Clifford.pm6`` :*45*:](https://github.com/grondilu/clifford/blob/1d4905ce9c6a795caec90609d20db8131f2c0ed0/lib/Clifford.pm6#L45) |
multi infix:\<==\>(MultiVector $A, Real $x) returns Bool is export { |
| [masak/007``…/README.md`` :*723*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/documentation/README.md#L723) |
func infix:\<::\>(lhs, rhs) is tighter(infix:\<==\>) is assoc("right") { |
| [masak/007``…/README.md`` :*813*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/documentation/README.md#L813) |
func infix:\<..\>(lhs, rhs) is looser(infix:\<==\>) { |
| [masak/007``…/Equal.pm6`` :*4*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/lib/_007/Equal.pm6#L4) |
# These multis are used below by infix:\<==\> and infix:\ |
| [masak/007``…/Val.pm6`` :*69*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/lib/_007/Val.pm6#L69) |
### of comparisons or match operations, such as \`infix:\<==\>\` or \`infix:\<\~\~\>\`. |
| [masak/007``…/Val.pm6`` :*561*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/lib/_007/Val.pm6#L561) |
### consider using infix:\<==\> on the respective type objects instead: |
| [masak/007``…/methods.t`` :*430*:](https://github.com/masak/007/blob/5e70be759d229b7e45062723a0431117ef89965a/t/builtins/methods.t#L430) |
outputs $program, "1\\n", "index() on Array uses infix:\<==\> semantics"; |
| [moznion/p6-Log-Minimal``…/Minimal.pm6`` :*22*:](https://github.com/moznion/p6-Log-Minimal/blob/3d3b8d481b84b1babdf7b27d1cc87f9b7ddbace0/lib/Log/Minimal.pm6#L22) |
has Sub $.print is rw; # (DateTime :$time, Str :$messages, Str :$trace); \<== not yet implemented... |
| [moznion/p6-Log-Minimal``…/Minimal.pm6`` :*23*:](https://github.com/moznion/p6-Log-Minimal/blob/3d3b8d481b84b1babdf7b27d1cc87f9b7ddbace0/lib/Log/Minimal.pm6#L23) |
has Sub $.die is rw; # (DateTime :$time, Str :$messages, Str :$trace); \<== not yet implemented... |
| [perl6/doc``…/5to6-perlop.pod6`` :*136*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/5to6-perlop.pod6#L136) |
C\<==\> and C\ both work as in Perl 5. |
| [perl6/doc``…/hashmap.pod6`` :*296*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/hashmap.pod6#L296) |
upon which the object identity operator (L\<===\>) rests. Order and containers |
| [perl6/doc``…/hashmap.pod6`` :*298*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/hashmap.pod6#L298) |
is never L\<===\> to another. |
| [perl6/doc``…/js-nutshell.pod6`` :*156*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L156) |
Node.js has two equality operators: C\<==\> and C\<===\>. |
| [perl6/doc``…/js-nutshell.pod6`` :*158*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L158) |
C\<==\> is the loose equality operator. When comparing operands with the same |
| [perl6/doc``…/js-nutshell.pod6`` :*178*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L178) |
The inverse of C\<==\> is C\. |
| [perl6/doc``…/js-nutshell.pod6`` :*180*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L180) |
Perl 6 has another operator similar to C\<==\>: C\. Instead of casting operands |
| [perl6/doc``…/js-nutshell.pod6`` :*190*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L190) |
C\<===\> is the strict equality operator. This returns true if both operands are |
| [perl6/doc``…/js-nutshell.pod6`` :*217*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/js-nutshell.pod6#L217) |
The inverse of C\<===\> is C\. |
| [perl6/doc``…/list.pod6`` :*184*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/list.pod6#L184) |
L\<===\|/routine/===\> infix operator. If you want to use another way to |
| [perl6/doc``…/math.pod6`` :*56*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/math.pod6#L56) |
L\\<===\>\|/routine/===\> is very close to the actual |
| [perl6/doc``…/mop.pod6`` :*80*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/mop.pod6#L80) |
comparison, and is how the C\<===\> infix operator is implemented. |
| [perl6/doc``…/objects.pod6`` :*101*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/objects.pod6#L101) |
L\\<===\>\|===\> identity operator: |
| [perl6/doc``…/operators.pod6`` :*46*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L46) |
X \| Sequencer \| \<==, ==\>, \<\<==, ==\>\> |
| [perl6/doc``…/operators.pod6`` :*1628*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1628) |
multi sub infix:\<==\>(Any, Any) |
| [perl6/doc``…/operators.pod6`` :*1629*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1629) |
multi sub infix:\<==\>(Int:D, Int:D) |
| [perl6/doc``…/operators.pod6`` :*1630*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1630) |
multi sub infix:\<==\>(Num:D, Num:D) |
| [perl6/doc``…/operators.pod6`` :*1631*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1631) |
multi sub infix:\<==\>(Rational:D, Rational:D) |
| [perl6/doc``…/operators.pod6`` :*1632*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1632) |
multi sub infix:\<==\>(Real:D, Real:D) |
| [perl6/doc``…/operators.pod6`` :*1633*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1633) |
multi sub infix:\<==\>(Complex:D, Complex:D) |
| [perl6/doc``…/operators.pod6`` :*1634*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1634) |
multi sub infix:\<==\>(Numeric:D, Numeric:D) |
| [perl6/doc``…/operators.pod6`` :*1876*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1876) |
sub infix:\<===\>(Any, Any) |
| [perl6/doc``…/operators.pod6`` :*1887*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1887) |
For value types, C\<===\> behaves like C\: |
| [perl6/doc``…/operators.pod6`` :*1898*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1898) |
C\<===\> uses the L\ method to obtain the object identity. |
| [perl6/doc``…/operators.pod6`` :*2827*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2827) |
=head2 infix C«\<==» |
| [perl6/doc``…/operators.pod6`` :*2844*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2844) |
\<== grep({ /\<[PE]\>/ }) # (3) Look for P or E |
| [perl6/doc``…/operators.pod6`` :*2845*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2845) |
\<== map({ .tc }) # (2) Capitalize the words |
| [perl6/doc``…/operators.pod6`` :*2846*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2846) |
\<== \ # (1) Start with the input |
| [perl6/doc``…/operators.pod6`` :*2851*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2851) |
\<== sort() # (4) Sort, result is \ |
| [perl6/doc``…/operators.pod6`` :*2852*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2852) |
\<== grep({ /\<[PE]\>/ }) # (3) Look for P or E |
| [perl6/doc``…/operators.pod6`` :*2853*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2853) |
\<== map({ .tc }) # (2) Capitalize the words |
| [perl6/doc``…/operators.pod6`` :*2854*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2854) |
\<== \; # (1) Start with the input |
| [perl6/doc``…/operators.pod6`` :*2858*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2858) |
\<== sort() |
| [perl6/doc``…/operators.pod6`` :*2859*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2859) |
\<== grep({ /\<[PE]\>/ }) |
| [perl6/doc``…/operators.pod6`` :*2860*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2860) |
\<== my @caps # unlike ==\>, there's no need for additional statement |
| [perl6/doc``…/operators.pod6`` :*2861*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2861) |
\<== map({ .tc }) |
| [perl6/doc``…/operators.pod6`` :*2862*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L2862) |
\<== \; |
| [perl6/doc``…/rb-nutshell.pod6`` :*458*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/rb-nutshell.pod6#L458) |
For example, using C\<==\> tries to convert the values to numbers, and C\ |
| [perl6/doc``…/rb-nutshell.pod6`` :*475*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/rb-nutshell.pod6#L475) |
This is a very common matching operator which is similar to C\<===\> in Ruby. Here are |
| [perl6/doc``…/rb-nutshell.pod6`` :*491*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/rb-nutshell.pod6#L491) |
Please note that, in this case, C\<===\> is not symmetric; in the first |
| [perl6/doc``…/rb-nutshell.pod6`` :*641*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/rb-nutshell.pod6#L641) |
that Ruby uses the C\<==\> comparison for each condition, but Perl 6 uses the |
| [perl6/doc``…/setbagmix.pod6`` :*56*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/setbagmix.pod6#L56) |
method (i.e. the same way that the L\<===\> operator checks identity). For value |
| [perl6/doc``…/structures.pod6`` :*42*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/structures.pod6#L42) |
in the sense that C\<===\> will say it is; as it is shown, different values of the |
| [perl6/doc``…/Bag.pod6`` :*19*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Bag.pod6#L19) |
C\, items that would compare positively with the L\<===\> operator are |
| [perl6/doc``…/BagHash.pod6`` :*15*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/BagHash.pod6#L15) |
items that would compare positively with the L\<===\> operator are considered the |
| [perl6/doc``…/Enumeration.pod6`` :*165*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Enumeration.pod6#L165) |
=head2 method C\<===\> |
| [perl6/doc``…/Enumeration.pod6`` :*169*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Enumeration.pod6#L169) |
multi infix:\<===\> (Enumeration:D \\a, Enumeration:D \\b) |
| [perl6/doc``…/Junction.pod6`` :*43*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Junction.pod6#L43) |
C\<2\|3\>. The next autothreading step is over C\<\< infix:\<==\> \>\>, which produces |
| [perl6/doc``…/Junction.pod6`` :*183*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Junction.pod6#L183) |
The reason is that C\<==\> (and most other operators) are subject to |
| [perl6/doc``…/List.pod6`` :*799*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/List.pod6#L799) |
result list. C\ uses the semantics of the L\<===\> operator to decide |
| [perl6/doc``…/List.pod6`` :*863*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/List.pod6#L863) |
Like L\\>, C\ uses the semantics of the L\<===\> operator to decide |
| [perl6/doc``…/Mix.pod6`` :*17*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Mix.pod6#L17) |
items that would compare positively with the L\<===\> operator are |
| [perl6/doc``…/MixHash.pod6`` :*14*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/MixHash.pod6#L14) |
items that would compare positively with the L\<===\> operator are considered the |
| [perl6/doc``…/Num.pod6`` :*70*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Num.pod6#L70) |
To test for C\, use L\ method or L\<=== operator\|/language/operators#infix\_===\>: |
| [perl6/doc``…/ObjAt.pod6`` :*12*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/ObjAt.pod6#L12) |
If two objects compare equally via C\<===\>, their C\<.WHICH\> methods return |
| [perl6/doc``…/Set.pod6`` :*14*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Set.pod6#L14) |
compare positively with the L\<===\> operator): |
| [perl6/doc``…/SetHash.pod6`` :*14*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/SetHash.pod6#L14) |
compare positively with the L\<===\> operator): |
| [perl6/doc``…/Test.pod6`` :*154*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Test.pod6#L154) |
C\<===\> operator will be used instead; accepts an optional description of the |
| [pierre-vigier/Perl6-Math-Matrix``…/Matrix.pod`` :*839*:](https://github.com/pierre-vigier/Perl6-Math-Matrix/blob/65e547bcf100812cb1513727ff270a380e395e6d/lib/Math/Matrix.pod#L839) |
of the first matrix on a particular position has to be numerically equal (as checked by I\<==\>) to the element |
| [ppentchev/Serialize-Naive``…/01-simple.t`` :*16*:](https://github.com/ppentchev/Serialize-Naive/blob/74339a470c224795694cf479a713d1b153075b28/t/01-simple.t#L16) |
multi sub infix:\<==\>(Point:D $p1, Point:D $p2) |
| [ppentchev/Serialize-Naive``…/01-simple.t`` :*27*:](https://github.com/ppentchev/Serialize-Naive/blob/74339a470c224795694cf479a713d1b153075b28/t/01-simple.t#L27) |
multi sub infix:\<==\>(Circle:D $c1, Circle:D $c2) |
| [ppentchev/Serialize-Naive``…/02-twigils.t`` :*16*:](https://github.com/ppentchev/Serialize-Naive/blob/74339a470c224795694cf479a713d1b153075b28/t/02-twigils.t#L16) |
multi sub infix:\<==\>(Point:D $p1, Point:D $p2) |
| [ppentchev/Serialize-Naive``…/02-twigils.t`` :*27*:](https://github.com/ppentchev/Serialize-Naive/blob/74339a470c224795694cf479a713d1b153075b28/t/02-twigils.t#L27) |
multi sub infix:\<==\>(Circle:D $c1, Circle:D $c2) |
| [retupmoca/P6-Net-IMAP``…/IMAP.pm6`` :*15*:](https://github.com/retupmoca/P6-Net-IMAP/blob/b5d072331a28693c029e33ca0deece35163e8161/lib/Net/IMAP.pm6#L15) |
note '\<== '\~$line; |
| [retupmoca/P6-Net-POP3``…/POP3.pm6`` :*24*:](https://github.com/retupmoca/P6-Net-POP3/blob/95f7fee3c1907d22c0775af082a50135fc792000/lib/Net/POP3.pm6#L24) |
note '\<== '\~$line; |
| [retupmoca/P6-Net-SMTP``…/SMTP.pm6`` :*25*:](https://github.com/retupmoca/P6-Net-SMTP/blob/7f67d5067a7a97b09b794e701a27c16fd2f6bee3/lib/Net/SMTP.pm6#L25) |
note '\<== '\~$line; |
| [sergot/http-useragent``…/UserAgent.pm6`` :*165*:](https://github.com/sergot/http-useragent/blob/db754a0a6a7c0e0462d426a6f04cd628c040f2e2/lib/HTTP/UserAgent.pm6#L165) |
$.debug-handle.say("\<\<==Recv\\n" \~ $response.Str(:debug)) if $.debug; |
| [skids/perl6sum``…/README.md`` :*85*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/README.md#L85) |
@pbytes \<== $mySHA1 \<== $myMD5 \<== generate\_packet(); |
| [skids/perl6sum``…/Sum.pm6`` :*82*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/lib/Sum.pm6#L82) |
my @a \<== $s \<== (1,2); |
| [skids/perl6sum``…/sum.t`` :*56*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/t/sum.t#L56) |
@a \<== $f \<== (4,5); |
| [skids/perl6sum``…/sum.t`` :*93*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/t/sum.t#L93) |
@b \<== $g \<== (4,5); |
| [skids/perl6sum``…/sum.t`` :*126*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/t/sum.t#L126) |
@c \<== $h \<== (4,5); |
| [skids/perl6sum``…/sum.t`` :*138*:](https://github.com/skids/perl6sum/blob/c2a8ac662b0c10dfc85ae05eec674e7be2702906/t/sum.t#L138) |
#@d \<== $h.partials \<== (2,3); |
| [spitsh/spitsh``…/HTTP.sp`` :*142*:](https://github.com/spitsh/spitsh/blob/9bfc183c6c2aa01b7f30c5cbfc9b7dabd39429e8/resources/src/HTTP.sp#L142) |
debug "HTTP \<== {$response.code} {$response.message} $self", "\\c[GLOBE WITH MERIDIANS]"; |
| [supernovus/perl6-datetime-math``…/Math.pm6`` :*103*:](https://github.com/supernovus/perl6-datetime-math/blob/722b4452f8f58a9fa7f76c63662c4cf337e1b050/lib/DateTime/Math.pm6#L103) |
#multi infix:\<==\>(DateTime $a, DateTime $b) is export { |
| [titsuki/p6-Algorithm-KdTree``…/Response.pm6`` :*40*:](https://github.com/titsuki/p6-Algorithm-KdTree/blob/b1d5bddba093c52855878a083ad4395fb3184b29/lib/Algorithm/KdTree/Response.pm6#L40) |
my @array \<== map { 0e0 } \<== [0..^$c-dim]; |
| [titsuki/p6-Algorithm-KdTree``…/02-insert.t`` :*27*:](https://github.com/titsuki/p6-Algorithm-KdTree/blob/b1d5bddba093c52855878a083ad4395fb3184b29/t/02-insert.t#L27) |
my @array \<== map { .Num } \<== (1..512); |