``…/Results.pm6`` :*46*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/CTILMES/DB-Pg/lib/DB/Pg/Results.pm6#L46) |
return () unless 0 ≤ $row \< self.rows; |
| [FRITH/Desktop-Notify-Progress``…/Progress.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FRITH/Desktop-Notify-Progress/lib/Desktop/Notify/Progress.pm6#L28) |
X::AdHoc.new(payload =\> '$size must be \> 0').throw if $size.defined \&\& $size ≤ 0; |
| [FRITH/Math-FFT-Libfftw3``…/README.md`` :*175*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FRITH/Math-FFT-Libfftw3/README.md#L175) |
This module needs Perl 6 ≥ 2018.09 only if one wants to use shaped arrays as input data. An attempt to feed a shaped |
| [FRITH/Math-FFT-Libfftw3``…/C2C.pm6`` :*303*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FRITH/Math-FFT-Libfftw3/lib/Math/FFT/Libfftw3/C2C.pm6#L303) |
This module needs Perl 6 ≥ 2018.09 only if one wants to use shaped arrays as input data. An attempt to feed a shaped |
| [FRITH/Math-FFT-Libfftw3``…/R2C.pm6`` :*331*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FRITH/Math-FFT-Libfftw3/lib/Math/FFT/Libfftw3/R2C.pm6#L331) |
This module needs Perl 6 ≥ 2018.09 only if one wants to use shaped arrays as input data. An attempt to feed a shaped |
| [FRITH/Math-FFT-Libfftw3``…/R2R.pm6`` :*320*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/FRITH/Math-FFT-Libfftw3/lib/Math/FFT/Libfftw3/R2R.pm6#L320) |
This module needs Perl 6 ≥ 2018.09 only if one wants to use shaped arrays as input data. An attempt to feed a shaped |
| [HANENKAMP/Path-Router``…/Router.pm6`` :*166*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/HANENKAMP/Path-Router/lib/Path/Router.pm6#L166) |
) \|\| die X::RouteNotMatched.new("LENGTH DID NOT MATCH ({$required.elems} required {$required.elems \<= @keys.elems ?? "≤" !! "≰"} {@keys… |
| [JMASLAK/DateTime-Monotonic``…/Monotonic.pm6`` :*88*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/lib/DateTime/Monotonic.pm6#L88) |
if ($val + $!offset) ≥ $!last-time { |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*30*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L30) |
ok ($end - $start) ≥ 1, "Time (numeric) moves forward"; |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*31*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L31) |
ok ($end-int - $start-int) ≥ 1, "Time (whole) moves forward"; |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L32) |
ok ($end - $start) ≤ 60, "Time (numeric) doesn't move forward too much"; |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L33) |
ok ($end-int - $start-int) ≤ 60, "Time (whole) doesn't move forward too much"; |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*61*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L61) |
ok ($end - $start) ≥ 1, "Time moves forward"; |
| [JMASLAK/DateTime-Monotonic``…/01-basic.t`` :*62*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/DateTime-Monotonic/t/01-basic.t#L62) |
ok ($end - $start) ≤ 60, "Time doesn't move forward too much"; |
| [JMASLAK/Net-BGP``…/bgpmon.pl6`` :*128*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/bin/bgpmon.pl6#L128) |
if $cnt++ ≤ 8\*2\*$batch-size { |
| [JMASLAK/Net-BGP``…/bgpmon.pl6`` :*168*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/bin/bgpmon.pl6#L168) |
if $max-log-messages.defined \&\& ($messages-logged ≥ $max-log-messages) { |
| [JMASLAK/Net-BGP``…/AFI-SAFI.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AFI-SAFI.pm6#L28) |
return False if $a.afi-code ≠ $b.afi-code; |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*15*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L15) |
has buf8:D $.raw is required where { $^a.bytes ≥ 2 }; |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*19*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L19) |
if $.raw.bytes ≠ 2 + self.asn-size \* self.asn-count { |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*20*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L20) |
die("Path segment wrong length ({$.raw.bytes} ≠ {2+ self.asn-size \* self.asn-count})"); |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L34) |
if self.asn-size \* self.asn-count + 2 ≠ $!raw.bytes { |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*111*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L111) |
if (!$asn32) and ($ele ≥ 2¹⁶) { $ele = 23456; } |
| [JMASLAK/Net-BGP``…/AS-List.pm6`` :*170*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/AS-List.pm6#L170) |
if $.raw.bytes ≠ 2 + self.asn-size \* self.asn-count { |
| [JMASLAK/Net-BGP``…/CIDR.pm6`` :*38*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/CIDR.pm6#L38) |
if @parts.elems ≠ 2 { die("Invalid CIDR - $ip"); } |
| [JMASLAK/Net-BGP``…/CIDR.pm6`` :*177*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/CIDR.pm6#L177) |
if self.ip-version ≠ $cidr.ip-version { return False } |
| [JMASLAK/Net-BGP``…/Capability.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability.pm6#L37) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 2) { |
| [JMASLAK/Net-BGP``…/Capability.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability.pm6#L48) |
if %capability-codes{ %params\ } ≠ %capability-names{ %params\ } { |
| [JMASLAK/Net-BGP``…/ASN32.pm6`` :*27*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/ASN32.pm6#L27) |
if $raw[0] ≠ 65 { die("Can only build a ASN32 capability"); } |
| [JMASLAK/Net-BGP``…/ASN32.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/ASN32.pm6#L28) |
if $raw[1] ≠ 4 { die("Bad capability length"); } |
| [JMASLAK/Net-BGP``…/ASN32.pm6`` :*38*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/ASN32.pm6#L38) |
if %params\ ≠ 65 { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*25*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/Generic.pm6#L25) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 2) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/Generic.pm6#L26) |
if ($raw.bytes - 2) ≠ $raw[1] { die("Invalid capability payload length"); } |
| [JMASLAK/Net-BGP``…/MPBGP.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/MPBGP.pm6#L29) |
if $raw[0] ≠ 1 { die("Can only build a MPBGP capability"); } |
| [JMASLAK/Net-BGP``…/MPBGP.pm6`` :*30*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/MPBGP.pm6#L30) |
if $raw[1] ≠ 4 { die("Bad capability length"); } |
| [JMASLAK/Net-BGP``…/MPBGP.pm6`` :*43*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/MPBGP.pm6#L43) |
if %params\ ≠ 1 { |
| [JMASLAK/Net-BGP``…/Route-Refresh.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/Route-Refresh.pm6#L26) |
if $raw[0] ≠ 2 { die("Can only build a Route-Refresh capability"); } |
| [JMASLAK/Net-BGP``…/Route-Refresh.pm6`` :*27*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/Route-Refresh.pm6#L27) |
if $raw[1] ≠ 0 { die("Bad capability length"); } |
| [JMASLAK/Net-BGP``…/Route-Refresh.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Capability/Route-Refresh.pm6#L37) |
if %params\ ≠ 2 { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*66*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L66) |
if ($open.asn ≠ 23456) \&\& ($peer-asn ≥ (2¹⁶)) { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*116*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L116) |
if ($open.asn ≠ $peer-asn) \&\& ($peer-asn \< (2¹⁶)) { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*119*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L119) |
if ($open.asn ≠ 23456) \&\& ($peer-asn ≥ (2¹⁶)) { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*126*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L126) |
if $open.asn ≠ $p.peer-asn { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*155*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L155) |
if $p.connection.defined \&\& ($p.connection.id ≠ $connection.id) { |
| [JMASLAK/Net-BGP``…/Controller.pm6`` :*326*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Controller.pm6#L326) |
my $asn16 = $.my-asn ≥ (2¹⁶) ?? 23456 !! $.my-asn; |
| [JMASLAK/Net-BGP``…/Conversions-Pre201812.pm6`` :*9*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Conversions-Pre201812.pm6#L9) |
# Helper subs for Rakudo ≤ 2018.11 |
| [JMASLAK/Net-BGP``…/Conversions.pm6`` :*13*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Conversions.pm6#L13) |
use Net::BGP::Conversions-Pre201812:if( $\*PERL.compiler.version ≤ v2018.11); |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*51*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L51) |
if @parts.elems ≠ 4 { die("Must pass 4 parts - you passed { @parts.elems }") } |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*69*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L69) |
\| [ (\) +% ':']? '::' [ (\) +% ':' ]? \≤ 8 }\> |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*73*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L73) |
token h16 { (\<:hexdigit\>+) \≤ 4 }\> } |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*111*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L111) |
if $buf.bytes ≠ $bytes { |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*112*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L112) |
die("buf8-to-ipv6 called with wrong length buffer ($bytes ≠ {$buf.bytes})"); |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*118*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L118) |
$int += $buf[$byte] unless $byte ≥ $bytes; |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*140*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L140) |
if @parts[$i] ≠ 0 { |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*155*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L155) |
if $best-run.defined and $i ≥ $best-run and $i \< ($best-run + $best-length) { |
| [JMASLAK/Net-BGP``…/IP.pm6`` :*158*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/IP.pm6#L158) |
if $i ≠ 7 { |
| [JMASLAK/Net-BGP``…/Message.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message.pm6#L48) |
if %params\:exists and %params\ ≠ %params\ { |
| [JMASLAK/Net-BGP``…/Keep-Alive.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Keep-Alive.pm6#L34) |
if (%params\ ≠ 4) { die("Invalid message type for Keep-Alive"); } |
| [JMASLAK/Net-BGP``…/Notify.pm6`` :*55*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify.pm6#L55) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Notify.pm6`` :*56*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify.pm6#L56) |
if $raw[0] ≠ 3 { # Not notify |
| [JMASLAK/Net-BGP``…/Notify.pm6`` :*70*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify.pm6#L70) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Notify.pm6`` :*81*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify.pm6#L81) |
if %params\ ≠ %error-names{ %params\ }.implemented-error-code { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Generic.pm6#L29) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Generic.pm6#L32) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Generic.pm6#L47) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L36) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L37) |
if $raw[0] ≠ 3 { # Not notify |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*40*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L40) |
if $raw[1] ≠ 1 { # Not Header Error |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L54) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L58) |
if (%params\ ≠ 1) { die("Invalid error type for Header"); } |
| [JMASLAK/Net-BGP``…/Header.pm6`` :*69*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header.pm6#L69) |
if %params\ ≠ %error-subnames{ %params\ }.implemented-error-subcode { |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L32) |
if $raw[1] ≠ 1 { # Not an Header error |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L35) |
if $raw[2] ≠ 1 { # Not a Connection Not Syncronized |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*50*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L50) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L54) |
if (%params\ ≠ 1) { die("Invalid error type for Header"); } |
| [JMASLAK/Net-BGP``…/Connection-Not-Syncronized.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Connection-Not-Syncronized.pm6#L58) |
if (%params\ ≠ 1) { die("Invalid error type for Connection not Syncronized"); } |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Generic.pm6#L26) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Generic.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Generic.pm6#L32) |
if $raw[1] ≠ 1 { # Not an Header error |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Generic.pm6#L47) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*51*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Header/Generic.pm6#L51) |
if (%params\ ≠ 1) { die("Invalid error type for Header"); } |
| [JMASLAK/Net-BGP``…/Hold-Timer-Expired.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Hold-Timer-Expired.pm6#L32) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Hold-Timer-Expired.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Hold-Timer-Expired.pm6#L35) |
if $raw[1] ≠ 4 { # Not a hold time expiired |
| [JMASLAK/Net-BGP``…/Hold-Timer-Expired.pm6`` :*45*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Hold-Timer-Expired.pm6#L45) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Hold-Timer-Expired.pm6`` :*49*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Hold-Timer-Expired.pm6#L49) |
if (%params\ ≠ 4) { die("Invalid message type for Hold-Timer-Expired"); } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L36) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L37) |
if $raw[0] ≠ 3 { # Not notify |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*40*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L40) |
if $raw[1] ≠ 2 { # Not Open Error |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L54) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L58) |
if (%params\ ≠ 2) { die("Invalid error type for Open"); } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*69*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open.pm6#L69) |
if %params\ ≠ %error-subnames{ %params\ }.implemented-error-subcode { |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L26) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L32) |
if $raw[1] ≠ 2 { # Not an Open error |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L35) |
if $raw[2] ≠ 2 { # Not a bad peer AS |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*50*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L50) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L54) |
if (%params\ ≠ 2) { die("Invalid error type for Open"); } |
| [JMASLAK/Net-BGP``…/Bad-Peer-AS.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Bad-Peer-AS.pm6#L58) |
if (%params\ ≠ 2) { die("Invalid error type for Bad Peer AS"); } |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Generic.pm6#L26) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Generic.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Generic.pm6#L32) |
if $raw[1] ≠ 2 { # Not an Open error |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Generic.pm6#L47) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*51*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Generic.pm6#L51) |
if (%params\ ≠ 2) { die("Invalid error type for Open"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L32) |
if $raw[1] ≠ 2 { # Not an Open error |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L35) |
if $raw[2] ≠ 4 { # Not a bad peer AS |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*50*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L50) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L54) |
if (%params\ ≠ 2) { die("Invalid error type for Open"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Optional-Parameter.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Optional-Parameter.pm6#L58) |
if (%params\ ≠ 4) { die("Invalid error type for Unsupported Optional Parameter"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L29) |
if $raw[0] ≠ 3 { # Not a notify |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*32*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L32) |
if $raw[1] ≠ 2 { # Not an Open error |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L35) |
if $raw[2] ≠ 1 { # Not an Unsupported-Version |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*50*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L50) |
if (%params\ ≠ 3) { die("Invalid message type for NOTIFY"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L54) |
if (%params\ ≠ 2) { die("Invalid error type for Open"); } |
| [JMASLAK/Net-BGP``…/Unsupported-Version.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Notify/Open/Unsupported-Version.pm6#L58) |
if (%params\ ≠ 1) { die("Invalid error type for Unsupported Version"); } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*111*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L111) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 11) { |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*113*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L113) |
if $obj.version ≠ 4 { die Net::BGP::Error::Unknown-Version.new(:version($obj.version)) } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*114*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L114) |
if $obj.hold-time ≠ 0 and $obj.hold-time \< 3 { |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*142*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L142) |
if (%params\ ≠ 1) { die("Invalid message type for OPEN"); } |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*153*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L153) |
if %params\ ≠ 4 { |
| [JMASLAK/Net-BGP``…/Open.pm6`` :*157*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Open.pm6#L157) |
if %params\ ≠ 0 and %params\ \< 3 { die "Invalid hold time" } |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*157*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L157) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 2, Bool:D :$asn32) { |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*192*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L192) |
if (%params\ ≠ 2) { die("Invalid message type for UPDATE"); } |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*196*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L196) |
if (%params\ ≠ 'UPDATE') { |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*289*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L289) |
if $aggregate-asn ≥ 2¹⁶ and ! $asn32 { $aggregate-asn = 23456 } |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*357*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L357) |
if !$asn32 and %params\.comb(/ \<[0..9]\>+ /).first(\* ≥ 2¹⁶).defined { |
| [JMASLAK/Net-BGP``…/Update.pm6`` :*377*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Message/Update.pm6#L377) |
\&\& ( %params\ ≥ 2¹⁶ ) |
| [JMASLAK/Net-BGP``…/Parameter.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Parameter.pm6#L47) |
if %params\:exists and %params\ ≠ %params\ { |
| [JMASLAK/Net-BGP``…/Capabilities.pm6`` :*45*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Parameter/Capabilities.pm6#L45) |
if $raw[0] ≠ 2 { die("Can only build a Capabilities parameter") } |
| [JMASLAK/Net-BGP``…/Capabilities.pm6`` :*63*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Parameter/Capabilities.pm6#L63) |
if %params\ ≠ 2 { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Parameter/Generic.pm6#L47) |
if %params\.Str ≠ %params\ { |
| [JMASLAK/Net-BGP``…/Path-Attribute.pm6`` :*64*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute.pm6#L64) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 2, Bool:D :$asn32) { |
| [JMASLAK/Net-BGP``…/Path-Attribute.pm6`` :*75*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute.pm6#L75) |
if %path-attribute-codes{ %params\ } ≠ %path-attribute-names{ %params\ } { |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L28) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3, :$asn32) { |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*40*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L40) |
if $raw[1] ≠ 2 { die("Can only create a AS-Path attribute") } |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L53) |
if %params\ ≠ 2 { |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*59*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L59) |
if %params\ ≠ 'AS-Path' { |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*118*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L118) |
if $top.path-length ≤ $len { |
| [JMASLAK/Net-BGP``…/AS-Path.pm6`` :*150*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS-Path.pm6#L150) |
if $top.path-length ≤ $len { |
| [JMASLAK/Net-BGP``…/AS4-Aggregator.pm6`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Aggregator.pm6#L33) |
if $raw[1] ≠ 18 { die("Can only create an Origin attribute") } |
| [JMASLAK/Net-BGP``…/AS4-Aggregator.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Aggregator.pm6#L35) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/AS4-Aggregator.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Aggregator.pm6#L36) |
if $raw[2] ≠ 8 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/AS4-Aggregator.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Aggregator.pm6#L47) |
if %params\ ≠ 18 { |
| [JMASLAK/Net-BGP``…/AS4-Aggregator.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Aggregator.pm6#L53) |
if %params\ ≠ 'AS4-Aggregator' { |
| [JMASLAK/Net-BGP``…/AS4-Path.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Path.pm6#L28) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3, :$asn32) { |
| [JMASLAK/Net-BGP``…/AS4-Path.pm6`` :*39*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Path.pm6#L39) |
if $raw[1] ≠ 17 { die("Can only create a AS4-Path attribute") } |
| [JMASLAK/Net-BGP``…/AS4-Path.pm6`` :*52*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Path.pm6#L52) |
if %params\ ≠ 17 { |
| [JMASLAK/Net-BGP``…/AS4-Path.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/AS4-Path.pm6#L58) |
if %params\ ≠ 'AS4-Path' { |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L34) |
if $raw[1] ≠ 7 { die("Can only create an Origin attribute") } |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L36) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L37) |
if $asn32 \&\& $raw[2] ≠ 8 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*38*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L38) |
if !$asn32 \&\& $raw[2] ≠ 6 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*49*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L49) |
if %params\ ≠ 7 { |
| [JMASLAK/Net-BGP``…/Aggregator.pm6`` :*55*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Aggregator.pm6#L55) |
if %params\ ≠ 'Aggregator' { |
| [JMASLAK/Net-BGP``…/Atomic-Aggregate.pm6`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Atomic-Aggregate.pm6#L33) |
if $raw[1] ≠ 6 { die("Can only create an Atomic-Aggregate attribute") } |
| [JMASLAK/Net-BGP``…/Atomic-Aggregate.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Atomic-Aggregate.pm6#L35) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Atomic-Aggregate.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Atomic-Aggregate.pm6#L36) |
if $raw[2] ≠ 0 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Atomic-Aggregate.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Atomic-Aggregate.pm6#L47) |
if %params\ ≠ 6 { |
| [JMASLAK/Net-BGP``…/Atomic-Aggregate.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Atomic-Aggregate.pm6#L53) |
if %params\ ≠ 'Atomic-Aggregate' { |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*28*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L28) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3, :$asn32) { |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L33) |
if $raw[1] ≠ 10 { die("Can only create a Cluster-List attribute") } |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*38*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L38) |
if $raw.bytes ≠ ($len + 4) { die("Cluster-List attribute has bad payload length") } |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*41*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L41) |
if $raw.bytes ≠ ($len + 3) { die("Cluster-List attribute has bad payload length") } |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L53) |
if %params\ ≠ 10 { |
| [JMASLAK/Net-BGP``…/Cluster-List.pm6`` :*59*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Cluster-List.pm6#L59) |
if %params\ ≠ 'Cluster-List' { |
| [JMASLAK/Net-BGP``…/Community.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Community.pm6#L36) |
method from-raw(buf8:D $raw where { $^r.bytes ≥ 3 }, Bool:D :$asn32) { |
| [JMASLAK/Net-BGP``…/Community.pm6`` :*44*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Community.pm6#L44) |
if $raw[1] ≠ 8 { die("Can only create a Community attribute") } |
| [JMASLAK/Net-BGP``…/Community.pm6`` :*46*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Community.pm6#L46) |
if ($raw.bytes - $offset) ≠ $len { die("Invalid path-attribute payload length ({$raw.bytes}, $offset, {$len}") } |
| [JMASLAK/Net-BGP``…/Community.pm6`` :*57*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Community.pm6#L57) |
if %params\ ≠ 8 { |
| [JMASLAK/Net-BGP``…/Community.pm6`` :*63*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Community.pm6#L63) |
if %params\ ≠ 'Community' { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*27*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Generic.pm6#L27) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3, Bool:D :$asn32) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Generic.pm6#L29) |
if ($raw.bytes - 4) ≠ nuint16($raw.subbuf(2,2)) { |
| [JMASLAK/Net-BGP``…/Generic.pm6`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Generic.pm6#L33) |
if ($raw.bytes - 3) ≠ $raw[2] { |
| [JMASLAK/Net-BGP``…/Local-Pref.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Local-Pref.pm6#L34) |
if $raw[1] ≠ 5 { die("Can only create a Local-Pref attribute") } |
| [JMASLAK/Net-BGP``…/Local-Pref.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Local-Pref.pm6#L36) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Local-Pref.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Local-Pref.pm6#L37) |
if $raw[2] ≠ 4 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Local-Pref.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Local-Pref.pm6#L48) |
if %params\ ≠ 5 { |
| [JMASLAK/Net-BGP``…/Local-Pref.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Local-Pref.pm6#L54) |
if %params\ ≠ 'Local-Pref' { |
| [JMASLAK/Net-BGP``…/MED.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MED.pm6#L34) |
if $raw[1] ≠ 4 { die("Can only create a MED attribute") } |
| [JMASLAK/Net-BGP``…/MED.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MED.pm6#L36) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/MED.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MED.pm6#L37) |
if $raw[2] ≠ 4 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/MED.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MED.pm6#L48) |
if %params\ ≠ 4 { |
| [JMASLAK/Net-BGP``…/MED.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MED.pm6#L54) |
if %params\ ≠ 'MED' { |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*31*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L31) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 7, :$asn32) { |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L36) |
if $raw[1] ≠ 14 { die("Can only create a MP-NLRI attribute") } |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*41*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L41) |
if $raw.bytes ≠ ($len + 4) { die("MP-NLRI attribute has bad payload length") } |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*44*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L44) |
if $raw.bytes ≠ ($len + 3) { die("MP-NLRI attribute has bad payload length") } |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*58*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L58) |
if %params\ ≠ 14 { |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*64*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L64) |
if %params\ ≠ 'MP-NLRI' { |
| [JMASLAK/Net-BGP``…/MP-NLRI.pm6`` :*156*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-NLRI.pm6#L156) |
if self.data[3] ≠ 4 { die("Invalid VPLS next hop length") } |
| [JMASLAK/Net-BGP``…/MP-Unreachable.pm6`` :*31*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-Unreachable.pm6#L31) |
method from-raw(buf8:D $raw where $raw.bytes ≥ 3, :$asn32) { |
| [JMASLAK/Net-BGP``…/MP-Unreachable.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-Unreachable.pm6#L36) |
if $raw[1] ≠ 15 { die("Can only create a MP-Unreachable attribute") } |
| [JMASLAK/Net-BGP``…/MP-Unreachable.pm6`` :*47*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-Unreachable.pm6#L47) |
if %params\ ≠ 15 { |
| [JMASLAK/Net-BGP``…/MP-Unreachable.pm6`` :*53*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/MP-Unreachable.pm6#L53) |
if %params\ ≠ 'MP-Unreachable' { |
| [JMASLAK/Net-BGP``…/Next-Hop.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Next-Hop.pm6#L34) |
if $raw[1] ≠ 3 { die("Can only create a Next-Hop attribute") } |
| [JMASLAK/Net-BGP``…/Next-Hop.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Next-Hop.pm6#L36) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Next-Hop.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Next-Hop.pm6#L37) |
if $raw[2] ≠ 4 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Next-Hop.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Next-Hop.pm6#L48) |
if %params\ ≠ 3 { |
| [JMASLAK/Net-BGP``…/Next-Hop.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Next-Hop.pm6#L54) |
if %params\ ≠ 'Next-Hop' { |
| [JMASLAK/Net-BGP``…/Origin.pm6`` :*33*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Origin.pm6#L33) |
if $raw[1] ≠ 1 { die("Can only create an Origin attribute") } |
| [JMASLAK/Net-BGP``…/Origin.pm6`` :*35*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Origin.pm6#L35) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Origin.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Origin.pm6#L36) |
if $raw[2] ≠ 1 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Origin.pm6`` :*49*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Origin.pm6#L49) |
if %params\ ≠ 1 { |
| [JMASLAK/Net-BGP``…/Origin.pm6`` :*55*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Origin.pm6#L55) |
if %params\ ≠ 'Origin' { |
| [JMASLAK/Net-BGP``…/Originator-ID.pm6`` :*34*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Originator-ID.pm6#L34) |
if $raw[1] ≠ 9 { die("Can only create a Originator-ID attribute") } |
| [JMASLAK/Net-BGP``…/Originator-ID.pm6`` :*36*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Originator-ID.pm6#L36) |
if ($raw.bytes - 3) ≠ $raw[2] { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Originator-ID.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Originator-ID.pm6#L37) |
if $raw[2] ≠ 4 { die("Invalid path-attribute payload length") } |
| [JMASLAK/Net-BGP``…/Originator-ID.pm6`` :*48*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Originator-ID.pm6#L48) |
if %params\ ≠ 9 { |
| [JMASLAK/Net-BGP``…/Originator-ID.pm6`` :*54*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Path-Attribute/Originator-ID.pm6#L54) |
if %params\ ≠ 'Originator-ID' { |
| [JMASLAK/Net-BGP``…/Peer-List.pm6`` :*84*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Peer-List.pm6#L84) |
if $now ≥ ($peer.last-connect-attempt + $peer.connect-retry-time) { |
| [JMASLAK/Net-BGP``…/Peer-List.pm6`` :*97*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Peer-List.pm6#L97) |
if $peer.state ≠ Net::BGP::Peer::Established { next; } |
| [JMASLAK/Net-BGP``…/Peer-List.pm6`` :*110*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Peer-List.pm6#L110) |
if $now ≥ ($peer.last-message-sent + $send-time) { |
| [JMASLAK/Net-BGP``…/Peer-List.pm6`` :*123*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Peer-List.pm6#L123) |
if $peer.state ≠ Net::BGP::Peer::Established { next; } |
| [JMASLAK/Net-BGP``…/Peer-List.pm6`` :*136*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Peer-List.pm6#L136) |
if $now ≥ (($peer.last-message-received // 0) + $send-time) { |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*37*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L37) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*40*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L40) |
if $rv ≠ $buffer { |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*41*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L41) |
self.close if $!state ≠ SOCKET\_CLOSED; |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*46*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L46) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*52*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L52) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*61*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L61) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*67*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L67) |
self.close if $!state ≠ SOCKET\_CLOSED; |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*77*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L77) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*96*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L96) |
self.close if $!state ≠ SOCKET\_CLOSED; |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*106*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L106) |
if $!state ≠ SOCKET\_OPEN { die "Socket in wrong state" } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*125*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L125) |
if $!state ≠ SOCKET\_OPEN { return; } |
| [JMASLAK/Net-BGP``…/Socket-Connection-Linux.pm6`` :*134*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Connection-Linux.pm6#L134) |
if self.state ≠ SOCKET\_CLOSED { self.close } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*160*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L160) |
if $!state ≠ SOCKET\_CLOSED { die "Socket in improper state" } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*179*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L179) |
if $!state ≠ SOCKET\_CREATED { die "Socket in improper state" } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*242*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L242) |
if $!state ≠ SOCKET\_BOUND { |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*261*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L261) |
if $!state ≠ SOCKET\_BOUND { die "Socket in improper state ( $!state )" } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*335*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L335) |
if $!state ≠ SOCKET\_BOUND { die "Socket in improper state" } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*427*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L427) |
# has Str:D $.tcpm\_key is rw where { $^s.chars ≤ 80 } = ''; |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*492*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L492) |
if $MD5.chars \> 80 { die("MD5 password must be ≤ 80 characters") } |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*535*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L535) |
if $!state ≠ SOCKET\_CREATED { |
| [JMASLAK/Net-BGP``…/Socket-Linux.pm6`` :*575*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Socket-Linux.pm6#L575) |
if self.state ≠ SOCKET\_CLOSED { self.close } |
| [JMASLAK/Net-BGP``…/Validation.pm6`` :*88*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Validation.pm6#L88) |
if 64496 ≤ $asn ≤ 64511 { return 'DOC'; } |
| [JMASLAK/Net-BGP``…/Validation.pm6`` :*89*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Validation.pm6#L89) |
if 64512 ≤ $asn ≤ 65534 { return 'PRIVATE'; } |
| [JMASLAK/Net-BGP``…/Validation.pm6`` :*91*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Validation.pm6#L91) |
if 65536 ≤ $asn ≤ 65551 { return 'DOC'; } |
| [JMASLAK/Net-BGP``…/Validation.pm6`` :*92*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Validation.pm6#L92) |
if 65552 ≤ $asn ≤ 131071 { return 'RESERVED'; } |
| [JMASLAK/Net-BGP``…/Validation.pm6`` :*93*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JMASLAK/Net-BGP/lib/Net/BGP/Validation.pm6#L93) |
if 4\_200\_000\_000 ≤ $asn ≤ 4\_294\_967\_294 { return 'PRIVATE'; } |
| [JNTHN/cro``…/app.js`` :*69516*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JNTHN/cro/resources/web/js/app.js#L69516) |
// Apply padding? Note that since r1 ≥ r0, da1 ≥ da0. |
| [JNTHN/cro``…/app.js`` :*74542*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JNTHN/cro/resources/web/js/app.js#L74542) |
\* for Small devices Tablets (≥768px) |
| [JNTHN/cro``…/app.js`` :*74550*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JNTHN/cro/resources/web/js/app.js#L74550) |
\* for Medium devices Desktops (≥992px) |
| [JNTHN/cro``…/app.js`` :*74558*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/JNTHN/cro/resources/web/js/app.js#L74558) |
\* for Large devices Desktops (≥1200px) |
| [TITSUKI/Random-Choice``…/bench.p6`` :*13*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TITSUKI/Random-Choice/example/bench.p6#L13) |
sub choice(:$size where \* ≥ 1 = 1, :@p where abs(1 - .sum) \< 1e-3) { |
| [TYIL/App-Assixt``…/Upload.pm6`` :*22*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TYIL/App-Assixt/lib/App/Assixt/Commands/Upload.pm6#L22) |
while ($tries ≤ $config\\) { |
| [TYIL/IRC-Client-Plugin-UrlTitle``…/TypeFormatters.pm6`` :*26*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/TYIL/IRC-Client-Plugin-UrlTitle/lib/IRC/Client/Plugin/UrlTitle/TypeFormatters.pm6#L26) |
while (1000 \< $size \&\& $suffix-indice ≤ @suffixes.end) { |
| [VRURG/IP-Addr``…/README.md`` :*492*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/README.md#L492) |
\`infix \<= / infix ≤ ( $addr1, $addr2 )\` |
| [VRURG/IP-Addr``…/README.md`` :*502*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/README.md#L502) |
\`infix \>= / infix ≥ ( $addr1, $addr2 )\` |
| [VRURG/IP-Addr``…/Addr.pm6`` :*489*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L489) |
=head2 C«infix \<= / infix ≤ ( $addr1, $addr2 )» |
| [VRURG/IP-Addr``…/Addr.pm6`` :*497*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L497) |
=head2 C«infix \>= / infix ≥ ( $addr1, $addr2 )» |
| [VRURG/IP-Addr``…/Addr.pm6`` :*642*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L642) |
multi infix:\<\< ≤ \>\> ( IP::Addr:D $a, IP::Addr:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*646*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L646) |
multi infix:\<\< ≤ \>\> ( IP::Addr:D $a, Str:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*650*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L650) |
multi infix:\<\< ≤ \>\> ( Str:D $a, IP::Addr:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*680*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L680) |
multi infix:\<\< ≥ \>\> ( IP::Addr:D $a, IP::Addr:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*684*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L684) |
multi infix:\<\< ≥ \>\> ( IP::Addr:D $a, Str:D $b ) is export { |
| [VRURG/IP-Addr``…/Addr.pm6`` :*688*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr.pm6#L688) |
multi infix:\<\< ≥ \>\> ( Str:D $a, IP::Addr:D $b ) is export { |
| [VRURG/IP-Addr``…/Handler.pm6`` :*213*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L213) |
( $!first-addr ≥ $ip.int-first-ip and $!first-addr ≤ $ip.int-last-ip ) \|\| |
| [VRURG/IP-Addr``…/Handler.pm6`` :*214*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L214) |
( $!last-addr ≥ $ip.int-first-ip and $!last-addr ≤ $ip.int-last-ip ) \|\| |
| [VRURG/IP-Addr``…/Handler.pm6`` :*215*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L215) |
( $ip.int-first-ip ≥ $!first-addr and $ip.int-first-ip ≤ $!last-addr ) \|\| |
| [VRURG/IP-Addr``…/Handler.pm6`` :*216*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L216) |
( $ip.int-last-ip ≥ $!first-addr and $ip.int-last-ip ≤ $!last-addr ) |
| [VRURG/IP-Addr``…/Handler.pm6`` :*278*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L278) |
multi method to-int ( @ntets where { $\_.elems ≤ self.n-tets } --\> Int ) { |
| [VRURG/IP-Addr``…/Handler.pm6`` :*283*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/lib/IP/Addr/Handler.pm6#L283) |
multi method to-int ( \*@ntets where { $\_.elems ≤ self.n-tets } --\> Int ) { samewith( @ntets ) } |
| [VRURG/IP-Addr``…/040-ipv4-ops.t`` :*41*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/t/040-ipv4-ops.t#L41) |
ok $ip2 ≤ "10.11.12.0/24", "network is \<= then itself in Str form"; |
| [VRURG/IP-Addr``…/041-ipv6-ops.t`` :*39*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/IP-Addr/t/041-ipv6-ops.t#L39) |
ok $ip2 ≤ "600d::f00d/112", "network is \<= then itself in Str form"; |
| [VRURG/OO-Plugin``…/patch-doc.p6`` :*75*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/OO-Plugin/build-tools/patch-doc.p6#L75) |
$.replaced \|\|= Version.new( $m ) ≠ $!ver; |
| [VRURG/OO-Plugin``…/040-order.t`` :*253*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/VRURG/OO-Plugin/t/040-order.t#L253) |
bail-out "expected %variant\ plugins, generated " \~ @plugins.elems if @plugins.elems ≠ %variant\; |
| [WARRINGD/Font-AFM``…/AFM.pm`` :*417*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/Font-AFM/lib/Font/AFM.pm#L417) |
"≅" =\> "congruent", "≈" =\> "approxequal", "≠" =\> "notequal", "≡" |
| [WARRINGD/Font-AFM``…/AFM.pm`` :*418*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/Font-AFM/lib/Font/AFM.pm#L418) |
=\> "equivalence", "≤" =\> "lessequal", "≥" =\> "greaterequal", "⊂" |
| [WARRINGD/HTML-Canvas-To-PDF``…/render-pdf-test-sheets.pdf`` :*5612*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/HTML-Canvas-To-PDF/examples/render-pdf-test-sheets.pdf#L5612) |
9xEEx9CH\*ֈxC5�xC71vx86xE3Xx89Dx8C?x91x80�+jg�NxC2IxE2xBB$\*�xC7Tx94xA3E�x80�x8B%txA7x84x93xB2 xDB�xFC�'xB2x89%�6x81\<4bxA9xE8�G߮S�vx96x81xE19xA7x92x8AxE4�rVxACxE6XF��xACxE4I��xC3�NxA1xD2qx8B��xE8O9�
� xC31xB2'%,x80"x86xE5xD4b�≤xC2;�xD0\&xE8D}
xFDxA4\>A'qxDF… |
| [WARRINGD/PDF-Class``…/Exponential.pm`` :*16*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-Class/lib/PDF/Function/Exponential.pm#L16) |
has Numeric $.N is entry(:required); # (Required) The interpolation exponent. Each input value x will return n values, given by yj = C0j + xN × (C1j − C0j ), for 0 ≤ j \< n. |
| [WARRINGD/PDF-ISO_32000``…/Lab_colour_space.pm6`` :*27*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-ISO_32000/gen/lib/ISO_32000/Lab_colour_space.pm6#L27) |
amina\* amax≤≤ |
| [WARRINGD/PDF-ISO_32000``…/Lab_colour_space.pm6`` :*29*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-ISO_32000/gen/lib/ISO_32000/Lab_colour_space.pm6#L29) |
bminb\* bmax≤≤ |
| [WARRINGD/PDF-ISO_32000``…/Lab_colour_space_entries.html`` :*125*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-ISO_32000/gen/tables/Lab_colour_space_entries.html#L125) |
amina\* amax≤≤ |
| [WARRINGD/PDF-ISO_32000``…/Lab_colour_space_entries.html`` :*133*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-ISO_32000/gen/tables/Lab_colour_space_entries.html#L133) |
bminb\* bmax≤≤ |
| [WARRINGD/PDF-ISO_32000``…/Lab_colour_space_entries.json`` :*23*:](https://github.com/moritz/perl6-all-modules/blob/44c17582d24865e17713958e506ae64456e8b1b9/cpan/WARRINGD/PDF-ISO_32000/resources/ISO_32000/Lab_colour_space_entries.json#L23) |
"(Optional) An array of four numbers [ a min a max b min b max ] that shall specify the range of valid values for the a\* and b\* (B and C) com… |
| [0racle/p6-Net-Netmask``…/03-compare.t`` :*26*:](https://github.com/0racle/p6-Net-Netmask/blob/7ec563ef01819cefd60e374cbf4fc7008d50a80b/t/03-compare.t#L26) |
ok $net1.sk ≠ $net2.sk, "Inequality of two N::N objects (diff netmask)"; |
| [0racle/p6-Net-Netmask``…/03-compare.t`` :*34*:](https://github.com/0racle/p6-Net-Netmask/blob/7ec563ef01819cefd60e374cbf4fc7008d50a80b/t/03-compare.t#L34) |
ok $net1 ≠ $net2, ".8 ≠ .64"; |
| [0racle/p6-Net-Netmask``…/03-compare.t`` :*37*:](https://github.com/0racle/p6-Net-Netmask/blob/7ec563ef01819cefd60e374cbf4fc7008d50a80b/t/03-compare.t#L37) |
ok $net1 ≠ $net2, ".8.sk ≠ .64.sk"; |
| [0racle/p6-Net-Netmask``…/03-compare.t`` :*42*:](https://github.com/0racle/p6-Net-Netmask/blob/7ec563ef01819cefd60e374cbf4fc7008d50a80b/t/03-compare.t#L42) |
ok $net1 ≠ $net2, "192 ≠ 10"; |
| [0racle/p6-Net-Netmask``…/03-compare.t`` :*45*:](https://github.com/0racle/p6-Net-Netmask/blob/7ec563ef01819cefd60e374cbf4fc7008d50a80b/t/03-compare.t#L45) |
ok $net1.sk ≠ $net2.sk, "192.sk ≠ 10.sk"; |
| [AlexDaniel/orgsleep``…/bdf2json`` :*51*:](https://github.com/AlexDaniel/orgsleep/blob/c7ac458a1fde84c3a9eda0e86a5df96dcecd820d/bin/bdf2json#L51) |
{ @bitmap.unshift: () for ^($y-shift.abs) } if $y-shift \< 0 and @bitmap ≤ $min-height; |
| [AlexDaniel/orgsleep``…/orgsleep`` :*175*:](https://github.com/AlexDaniel/orgsleep/blob/c7ac458a1fde84c3a9eda0e86a5df96dcecd820d/bin/orgsleep#L175) |
for 0, \* + 7 …^ \* ≥ $graph-width { # date |
| [AlexDaniel/orgsleep``…/orgsleep`` :*184*:](https://github.com/AlexDaniel/orgsleep/blob/c7ac458a1fde84c3a9eda0e86a5df96dcecd820d/bin/orgsleep#L184) |
draw-text $day, $x - ① - ② × ($day≥10), $y + ⑥ + ⑥ × $lower, $COLOR-BORDER, :1size |
| [AlexDaniel/orgsleep``…/orgsleep`` :*218*:](https://github.com/AlexDaniel/orgsleep/blob/c7ac458a1fde84c3a9eda0e86a5df96dcecd820d/bin/orgsleep#L218) |
if $new-dt - $last\ ≥ $NO-DATA-THRESHOLD { |
| [bduggan/p6-jupyter-kernel``…/math.ipynb`` :*40*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/eg/math.ipynb#L40) |
" ( [+] @a Z× @b )² ≤ ( [+] @a»² ) × ( [+] @b»² )\\n", |
| [bduggan/p6-jupyter-kernel``…/Autocomplete.pm6`` :*11*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/lib/Jupyter/Kernel/Sandbox/Autocomplete.pm6#L11) |
constant equality-operators = \<\< ≠ ≅ == != \<=\> =:= === =\~= \>\>; |
| [bduggan/p6-jupyter-kernel``…/Autocomplete.pm6`` :*12*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/lib/Jupyter/Kernel/Sandbox/Autocomplete.pm6#L12) |
constant less-than-operators = \<\< \< ≤ \<= \>\>; |
| [bduggan/p6-jupyter-kernel``…/Autocomplete.pm6`` :*13*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/lib/Jupyter/Kernel/Sandbox/Autocomplete.pm6#L13) |
constant greater-than-operators = \<\< \> ≥ \>= \>\>; |
| [bduggan/p6-jupyter-kernel``…/05-autocomplete.t`` :*18*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/t/05-autocomplete.t#L18) |
is $c.complete('\<'), (0, 1, \<\< \< ≤ \<= \>\>), 'less than'; |
| [bduggan/p6-jupyter-kernel``…/05-autocomplete.t`` :*35*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/t/05-autocomplete.t#L35) |
ok $beer.elems ≤ 30, '30 or fewer results'; |
| [bduggan/p6-jupyter-kernel``…/05-autocomplete.t`` :*39*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/t/05-autocomplete.t#L39) |
ok '≤' ∈ @$got, 'found less-than'; |
| [bduggan/p6-jupyter-kernel``…/05-autocomplete.t`` :*43*:](https://github.com/bduggan/p6-jupyter-kernel/blob/52888c96ca83bed3ca3d9e7cd6103559214f8d66/t/05-autocomplete.t#L43) |
ok '≤' ∈ @$got, 'found ≤'; |
| [cosimo/perl6-cache-memcached``…/Memcached.pm`` :*127*:](https://github.com/cosimo/perl6-cache-memcached/blob/a18e25c472f8c255dfefdbe4258343bdfbbd7e03/lib/Cache/Memcached.pm#L127) |
elsif !%host\_dead{$host} \|\| %host\_dead{$host} ≤ now { |
| [gfldex/perl6-meta6-bin``…/bin.pm6`` :*423*:](https://github.com/gfldex/perl6-meta6-bin/blob/a0e9154d6fafdca7c2f8bbf881805739520268a4/lib/META6/bin.pm6#L423) |
loop (my $attempt = 1; $attempt ≤ 3; $attempt++) { |
| [perl6/Blin``…/blin.p6`` :*290*:](https://github.com/perl6/Blin/blob/9ca64bfcc4b959f482008e04488c2974388cf60d/bin/blin.p6#L290) |
$str \~= ‘ (left: ’ \~ @undone».name \~ ‘)’ if @undone ≤ 5; |
| [perl6/Blin``…/Processing.pm6`` :*423*:](https://github.com/perl6/Blin/blob/9ca64bfcc4b959f482008e04488c2974388cf60d/lib/Blin/Processing.pm6#L423) |
if $result\ ≠ 0 { |
| [perl6/Blin``…/Processing.pm6`` :*468*:](https://github.com/perl6/Blin/blob/9ca64bfcc4b959f482008e04488c2974388cf60d/lib/Blin/Processing.pm6#L468) |
if $bisect-start\ ≠ 0 or $bisect-old\ ≠ 0 { |
| [perl6/doc``…/operators.pod6`` :*35*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L35) |
C \| Chaining infix \| != ≠ == \< \<= ≤ \> \>= ≥ eq ne lt le gt ge \~\~ === eqv !eqv =\~= ≅ (elem) (cont) (\<) (\>) (\<=) (\>=) (\<\\+) (\>\\+) ∈ ∉ ∋ ∌ ⊂ ⊄ ⊃ ⊅ ⊆ ⊈ ⊇ ⊉ ≼ ≽ |
| [perl6/doc``…/operators.pod6`` :*1652*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1652) |
=head2 infix C«≠» |
| [perl6/doc``…/operators.pod6`` :*1680*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1680) |
=head2 infix C«≤» |
| [perl6/doc``…/operators.pod6`` :*1708*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/operators.pod6#L1708) |
=head2 infix C«≥» |
| [perl6/doc``…/unicode_ascii.pod6`` :*52*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/unicode_ascii.pod6#L52) |
X\<\|«\>X\<\|»\>X\<\|×\>X\<\|÷\>X\<\|≤\>X\<\|≥\>X\<\|≠\>X\<\|−\>X\<\|∘\>X\<\|≅\>X\<\|π\>X\<\|τ\>X\<\|𝑒\>X\<\|∞\>X\<\|…\>X\<\|‘\>X\<\|’\>X\<\|‚\>X\<\|“\>X\<\|”\>X\<\|„\>X\<\|｢\>X\<\|｣\>X\<\|⁺… |
| [perl6/doc``…/unicode_ascii.pod6`` :*60*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/unicode_ascii.pod6#L60) |
≤ \| U+2264 \| \<= \| |
| [perl6/doc``…/unicode_ascii.pod6`` :*61*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/unicode_ascii.pod6#L61) |
≥ \| U+2265 \| \>= \| |
| [perl6/doc``…/unicode_ascii.pod6`` :*62*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Language/unicode_ascii.pod6#L62) |
≠ \| U+2260 \| != \| |
| [perl6/doc``…/Complex.pod6`` :*168*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/doc/Type/Complex.pod6#L168) |
where the real part is ≥ 0 and the imaginary part has the same |
| [perl6/doc``…/Htmlify.pm6`` :*55*:](https://github.com/perl6/doc/blob/8ef3a57525b6eb66f674cb81326f7b5c6a481368/lib/Pod/Htmlify.pm6#L55) |
when 'A'.ord ≤ \*.ord ≤ 'Z'.ord { |
| [perl6/whateverable``…/Bisection.pm6`` :*71*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bisection.pm6#L71) |
if $status ≠ 0 { |
| [perl6/whateverable``…/Bisection.pm6`` :*127*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bisection.pm6#L127) |
if $old-exit-signal ≠ 0 { |
| [perl6/whateverable``…/Bisection.pm6`` :*144*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bisection.pm6#L144) |
if $old-exit-code ≠ 0 { |
| [perl6/whateverable``…/Bits.pm6`` :*31*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bits.pm6#L31) |
$max ≥ $str.chars ?? $str !! $str.substr(0, $cutoff - 1) \~ ‘…’ |
| [perl6/whateverable``…/Bits.pm6`` :*70*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bits.pm6#L70) |
$answer \~= “$days day{$days ≠ 1 ?? ‘s’ !! ‘’} and ” if $days; |
| [perl6/whateverable``…/Bits.pm6`` :*71*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Bits.pm6#L71) |
$answer \~= “≈$hours hour{$hours ≠ 1 ?? ‘s’ !! ‘’}”; |
| [perl6/whateverable``…/Builds.pm6`` :*65*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Builds.pm6#L65) |
\, $commit).exitcode ≠ 0; # make sure that $commit is valid |
| [perl6/whateverable``…/Builds.pm6`` :*71*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Builds.pm6#L71) |
return if $result\ ≠ 0; |
| [perl6/whateverable``…/Builds.pm6`` :*161*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Builds.pm6#L161) |
‘git’, ‘rev-parse’, ‘--verify’, $\).exitcode ≠ 0 { |
| [perl6/whateverable``…/Builds.pm6`` :*165*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Builds.pm6#L165) |
‘git’, ‘rev-parse’, ‘--verify’, $\).exitcode ≠ 0 { |
| [perl6/whateverable``…/Builds.pm6`` :*170*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Builds.pm6#L170) |
grumble ‘Couldn't find anything in the range’ if $result\ ≠ 0; |
| [perl6/whateverable``…/Heartbeat.pm6`` :*34*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Heartbeat.pm6#L34) |
$sig-compat = 10 if $\*PERL.compiler.version ≤ v2018.05; |
| [perl6/whateverable``…/Processing.pm6`` :*38*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Processing.pm6#L38) |
$output \~= “ «exit code = $\_\»” if .\ ≠ 0; |
| [perl6/whateverable``…/Processing.pm6`` :*39*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Processing.pm6#L39) |
$output \~= “ «exit signal = {Signal($\_\)} ($\_\)»” if .\ ≠ 0; |
| [perl6/whateverable``…/Processing.pm6`` :*117*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Processing.pm6#L117) |
if .\ ≥ 10\_000\_000 { |
| [perl6/whateverable``…/Running.pm6`` :*42*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Running.pm6#L42) |
while run(:err(Nil), ‘mkdir’, ‘--’, $build-path).exitcode ≠ 0 { |
| [perl6/whateverable``…/Running.pm6`` :*125*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Running.pm6#L125) |
$output \~= “ «exit code = $result\»” if $result\ ≠ 0; |
| [perl6/whateverable``…/Running.pm6`` :*126*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Running.pm6#L126) |
$output \~= “ «exit signal = {Signal($result\)} ($result\)»” if $result\ ≠ 0; |
| [perl6/whateverable``…/Running.pm6`` :*127*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/lib/Whateverable/Running.pm6#L127) |
grumble $output if $result\ ≠ 0 or $result\ ≠ 0; |
| [perl6/whateverable``…/pull-gh`` :*46*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/maintenance/pull-gh#L46) |
if $response.header.hash\[0] ≤ 5 { # github-friendly throttling |
| [perl6/whateverable``…/Benchable.p6`` :*49*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Benchable.p6#L49) |
if $result\ ≠ 0 { |
| [perl6/whateverable``…/Benchable.p6`` :*132*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Benchable.p6#L132) |
if abs(%times{@commits[$x]}\ - %times{@commits[$x + 1]}\) ≥ %times{@commits[$x]}\ × 0.1 { |
| [perl6/whateverable``…/Benchable.p6`` :*153*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Benchable.p6#L153) |
if @commits ≥ ITERATIONS { |
| [perl6/whateverable``…/Bisectable.p6`` :*118*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L118) |
if $old-result\ ≠ 0 { |
| [perl6/whateverable``…/Bisectable.p6`` :*137*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L137) |
grumble ‘Failed to run ｢bisect start｣’ if $bisect-start\ ≠ 0; |
| [perl6/whateverable``…/Bisectable.p6`` :*138*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L138) |
grumble ‘Failed to run ｢bisect old …”｣’ if $bisect-old\ ≠ 0; |
| [perl6/whateverable``…/Bisectable.p6`` :*141*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L141) |
if $init-result\ ≠ 0 { |
| [perl6/whateverable``…/Bisectable.p6`` :*149*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L149) |
if $old-result\ ≠ $new-result\ { # Signal |
| [perl6/whateverable``…/Bisectable.p6`` :*154*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L154) |
} elsif $old-result\ ≠ $new-result\ { # Exit code |
| [perl6/whateverable``…/Bisectable.p6`` :*160*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L160) |
if $old-result\ ≠ 0 { |
| [perl6/whateverable``…/Bisectable.p6`` :*186*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Bisectable.p6#L186) |
if $bisect-status ≠ 0 { |
| [perl6/whateverable``…/Coverable.p6`` :*97*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Coverable.p6#L97) |
$output \~= “ «exit code = $result\»” if $result\ ≠ 0; |
| [perl6/whateverable``…/Coverable.p6`` :*98*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Coverable.p6#L98) |
$output \~= “ «exit signal = {Signal($result\)} ($result\)»” if $result\ ≠ 0 |
| [perl6/whateverable``…/Evalable.p6`` :*71*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L71) |
if $good-only and ($result\ ≤ 0 or $result\ == SIGHUP) { |
| [perl6/whateverable``…/Evalable.p6`` :*73*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L73) |
return if $result\ ≠ 0; |
| [perl6/whateverable``…/Evalable.p6`` :*74*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L74) |
return if $result\ ≠ 0; |
| [perl6/whateverable``…/Evalable.p6`` :*84*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L84) |
$extra \~= “(exit code $result\) ” if $result\ ≠ 0; |
| [perl6/whateverable``…/Evalable.p6`` :*85*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L85) |
$extra \~= “(signal {Signal($result\)}) ” if $result\ ≠ 0 |
| [perl6/whateverable``…/Evalable.p6`` :*90*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Evalable.p6#L90) |
if $CONFIG\ ≥ ($reply-start, $output, $reply-end).map(\*.encode.elems).sum { |
| [perl6/whateverable``…/Greppable.p6`` :*100*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Greppable.p6#L100) |
grumble ‘Sorry, can't do that’ if $result\ ≠ 0 \| 1 or $result\ ≠ 0; |
| [perl6/whateverable``…/Nativecallable.p6`` :*23*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Nativecallable.p6#L23) |
if @pruned-output ≤ 10 { |
| [perl6/whateverable``…/Releasable.p6`` :*61*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Releasable.p6#L61) |
$answer \~= “≈$days day{$days ≠ 1 ?? ‘s’ !! ‘’} and ” if $days; |
| [perl6/whateverable``…/Releasable.p6`` :*62*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Releasable.p6#L62) |
$answer \~= “≈$hours hour{$hours ≠ 1 ?? ‘s’ !! ‘’}”; |
| [perl6/whateverable``…/Releasable.p6`` :*122*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Releasable.p6#L122) |
when .chars ≠ $SHA-LENGTH { |
| [perl6/whateverable``…/Releasable.p6`` :*176*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Releasable.p6#L176) |
$summary \~= “{+@tickets} blocker{@tickets ≠ 1 ?? ‘s’ !! ‘’}”; |
| [perl6/whateverable``…/Squashable.p6`` :*98*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Squashable.p6#L98) |
sub utc-hour($secs) { ($secs ≥ 0 ?? ‘+’ !! ‘-’) \~ abs $secs ÷ 60 ÷ 60 } |
| [perl6/whateverable``…/Squashable.p6`` :*284*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Squashable.p6#L284) |
notify :silent, “$login++ pushed $commits commit{$commits ≠ 1 ?? ‘s’ !! ‘’}”; |
| [perl6/whateverable``…/Unicodable.p6`` :*166*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Unicodable.p6#L166) |
$output \~= “ «exit code = $result\»” if $result\ ≠ 0; |
| [perl6/whateverable``…/Unicodable.p6`` :*167*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Unicodable.p6#L167) |
$output \~= “ «exit signal = {Signal($result\)} ($result\)»” if $result\ ≠ 0; |
| [perl6/whateverable``…/Unicodable.p6`` :*168*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/Unicodable.p6#L168) |
return $output if $result\ ≠ 0 or $result\ ≠ 0; |
| [perl6/whateverable``…/build.p6`` :*107*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xbin/build.p6#L107) |
return if $++ ≥ 10; # refuse to build too many commits at once |
| [perl6/whateverable``…/benchable.t`` :*57*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xt/benchable.t#L57) |
/^ \‘, ¦HEAD: «’ (\\d+)\\.\\d+ \≥ 2 }\> ‘»’ $/, |
| [perl6/whateverable``…/Testable.pm6`` :*28*:](https://github.com/perl6/whateverable/blob/c535eee82985765fbd64835c090f9459d760d803/xt/lib/Testable.pm6#L28) |
$sig-compat = SIGBUS if v2018.04 ≤ $\*PERL.compiler.version ≤ v2018.05; |
| [samgwise/Net-OSC``…/collate-readme.p6`` :*18*:](https://github.com/samgwise/Net-OSC/blob/20b5c133a6e5900d04abd228df5340d37afd0387/collate-readme.p6#L18) |
die "Failed '@cmd[]' when collecting content." if $p.exitcode ≠ 0; |
| [zoffixznet/perl6-WWW-vlc-Remote``…/Remote.pm6`` :*37*:](https://github.com/zoffixznet/perl6-WWW-vlc-Remote/blob/f74c287ddfe64822bee052f4370617ee23455adc/lib/WWW/vlc/Remote.pm6#L37) |
if $!duration ≤ 0 { |
| [zoffixznet/perl6-WhereList``…/README.md`` :*12*:](https://github.com/zoffixznet/perl6-WhereList/blob/da0af09ba66fe52660a8be162d3f995e32607fb6/README.md#L12) |
subset StrArray of Array where all-items Str, \*.chars ≥ 3, \*.contains: any \; |
| [zoffixznet/perl6-WhereList``…/wherelist.p6`` :*4*:](https://github.com/zoffixznet/perl6-WhereList/blob/da0af09ba66fe52660a8be162d3f995e32607fb6/examples/wherelist.p6#L4) |
subset StrArray of Array where all-items \*.chars ≥ 3, Str, \*.contains: any \; |
| [zoffixznet/perl6-WhereList``…/01-basic.t`` :*7*:](https://github.com/zoffixznet/perl6-WhereList/blob/da0af09ba66fe52660a8be162d3f995e32607fb6/t/01-basic.t#L7) |
where all-items Str, \*.chars ≥ 3, \*.contains: any \; |
| [zoffixznet/perl6-p6lert``…/p6lert`` :*42*:](https://github.com/zoffixznet/perl6-p6lert/blob/253f324d1d00b8b5374767d39212f4a643136abd/bin/p6lert#L42) |
$block-exit = True if $block-on and %s{$block-on} ≤ %s{.severity}; |
| [zostay/p6-Path-Router``…/Router.pm6`` :*166*:](https://github.com/zostay/p6-Path-Router/blob/06e81cd99be7599f7333a5bacdd54a6a099664ec/lib/Path/Router.pm6#L166) |
) \|\| die X::RouteNotMatched.new("LENGTH DID NOT MATCH ({$required.elems} required {$required.elems \<= @keys.elems ?? "≤" !! "≰"} {@keys… |