File | Code |
---|---|
BDUGGAN/Digest-SHA256-Native…/README.md :15: |
say sha256("The quick brown fox jumps over the lazy dog")».fmt('%02x').join; |
BDUGGAN/Digest-SHA256-Native…/Native.pm6 :21: |
my $str = $hash.list».chr.join.lc; |
CTILMES/BitEnum…/BitEnum.pm6 :31: |
method Str() { ~($.list()».key) } |
CTILMES/DB-Pg…/ArrayParser.pm6 :24: |
method array($/) { make $<element>».made } |
CTILMES/DB-Pg…/ArrayParser.pm6 :33: |
method quoted($/) { make $*converter.convert($*type, $<str>».made.join) } |
CTILMES/GraphQL…/Actions.pm :51: |
make $<VariableDefinition>».made; |
CTILMES/GraphQL…/Actions.pm :65: |
make $<Selection>».made |
CTILMES/GraphQL…/Actions.pm :163: |
make $<str>».made.join; |
CTILMES/GraphQL…/Actions.pm :216: |
make %( $<ObjectField>».made ); |
CTILMES/GraphQL…/Actions.pm :264: |
make $<Field>».made; |
CTILMES/GraphQL…/Actions.pm :337: |
make $<Value>».made; |
CTILMES/GraphQL…/Actions.pm :353: |
make $<EnumValue>».made; |
CTILMES/GraphQL…/Actions.pm :400: |
make $<ArgumentDefinition>».made; |
CTILMES/GraphQL…/Actions.pm :426: |
make $<InputField>».made; |
CTILMES/GraphQL…/Compare.pm :19: |
$l.possibleTypes».name eqv $r.possibleTypes».name; |
CTILMES/GraphQL…/Compare.pm :28: |
$l.interfaces».name eqv $r.interfaces».name; |
CTILMES/GraphQL…/Compare.pm :36: |
$l.possibleTypes».name eqv $r.possibleTypes».name; |
CTILMES/GraphQL…/Types.pm :17: |
$!description = $<Comment>».made.join(' '); |
CTILMES/GraphQL…/Types.pm :245: |
"union $.name = { (@!possibleTypes».name).join(' | ') }\n"; |
CTILMES/GraphQL…/Types.pm :277: |
('implements ' ~ (@!interfaces».name).join(', ') ~ ' ' |
CTILMES/LibGit2…/14-branch.t :38: |
is set($repo.branch-list».branch-name), set(<master abranch>), 'branch-list'; |
CTILMES/LibGit2…/14-branch.t :48: |
is set($repo.branch-list».branch-name), set(<master newbranch>), 'branch-list'; |
FRITH/File-Metadata-Libextractor…/raw-extract.p6 :21: |
»~» @args)».say; |
FRITH/File-Metadata-Libextractor…/Raw.pm6 :52: |
»~» @args)».say; |
FRITH/Image-Libexif…/README.md :26: |
say @tags».keys.flat.elems ~ ' tags found'; |
FRITH/Image-Libexif…/alltags.p6 :12: |
say @tags».keys.flat.elems ~ ' tags found'; |
FRITH/Image-Libexif…/Libexif.pm6 :305: |
say @tags».keys.flat.elems ~ ' tags found'; |
FRITH/Image-Libexif…/02-oo.t :32: |
cmp-ok $e4.alltags».keys.flat.elems, '==', 54, 'loaded tags'; |
FRITH/Image-Libexif…/02-oo.t :53: |
my $numkeys = @alltags».keys.flat.elems; |
FRITH/Image-QRCode…/qrimage.p6 :21: |
.map({ $_ xx 10 }))».map({ $_ xx 3, 255 }).flat; |
FRITH/Math-FFT-Libfftw3…/README.md :19: |
my @in = (0, π/100 … 2*π)».sin; |
FRITH/Math-FFT-Libfftw3…/README.md :20: |
put @in».Complex».round(10⁻¹²); # print the original array as complex values rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/README.md :26: |
put @outr».round(10⁻¹²); # print the backward transform output rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/README.md :42: |
put @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/1Dtransform.p6 :6: |
my @in = (0, π/100 … 2*π)».sin; |
FRITH/Math-FFT-Libfftw3…/1Dtransform.p6 :7: |
put @in».Complex».round(10⁻¹²); # print the original array as complex values rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/1Dtransform.p6 :13: |
put @outr».round(10⁻¹²); # print the backward transform output rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/2Dtransform.p6 :13: |
put @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/MathMatrix.p6 :15: |
say @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/benchmark1.p6 :11: |
my Complex @data = (1..6)».Complex; |
FRITH/Math-FFT-Libfftw3…/benchmark1.p6 :19: |
my $in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/benchmark1.p6 :29: |
my Complex @data1 = (1..10_000)».Complex; |
FRITH/Math-FFT-Libfftw3…/benchmark1.p6 :35: |
my $in1 = CArray[num64].new: (1..10_000)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/benchmark2.p6 :8: |
my $in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/benchmark2.p6 :13: |
$in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/benchmark2.p6 :28: |
$in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/benchmark2.p6 :43: |
$in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :66: |
@!in := CArray[num64].new: @data.map(|*)».reals.List.flat; |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :69: |
@!in := CArray[num64].new: (@data Z 0 xx @data.elems).flat».Num; |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :169: |
my @in = (0, π/100 … 2*π)».sin; |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :170: |
put @in».Complex».round(10⁻¹²); # print the original array as complex values rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :176: |
put @outr».round(10⁻¹²); # print the backward transform output rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/C2C.pm6 :194: |
put @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :70: |
@!in := CArray[num64].new: @data».Num; |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :81: |
@!in := CArray[num64].new: @data.map(|*)».reals.List.flat; |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :188: |
my @in = (0, π/100 … 2*π)».sin; |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :189: |
put @in».Complex».round(10⁻¹²); # print the original array as complex values rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :195: |
put @outr».round(10⁻¹²); # print the backward transform output rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/R2C.pm6 :213: |
put @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/R2R.pm6 :78: |
@!in := CArray[num64].new: @data».Num; |
FRITH/Math-FFT-Libfftw3…/R2R.pm6 :173: |
my @in = (0, π/100 … 2*π)».sin; |
FRITH/Math-FFT-Libfftw3…/R2R.pm6 :174: |
put @in».round(10⁻¹²); # print the original array as complex values rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/R2R.pm6 :180: |
put @outr».round(10⁻¹²); # print the backward transform output rounded to 10⁻¹² |
FRITH/Math-FFT-Libfftw3…/R2R.pm6 :198: |
put @outr».round(10⁻¹²); |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :10: |
my $in = CArray[num64].new: (1..6)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :15: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :21: |
-3e0, -5.196152422706632e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :27: |
is-deeply ($back.list »/» 6)[0, 2 … *]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :33: |
is-deeply $in.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :39: |
-3e0, -5.196152422706632e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :45: |
my $in = CArray[num64].new: (1..18)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :50: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :53: |
-27e0, -15.588457268119894e0, 0e0, 0e0, 0e0, 0e0, -27e0, -46.76537180435968e0, 0e0, 0e0, 0e0, 0e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :58: |
is-deeply ($back.list »/» 18)[0, 2 … *]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :65: |
my $in = CArray[num64].new: (1..54)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :70: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :77: |
0e0, 0e0, 0e0, 0e0, 0e0, 0e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :82: |
is-deeply ($back.list »/» 54)[0, 2 … *]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :89: |
my $in = CArray[num64].new: (1..54)».Complex».reals.flat; |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :95: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :102: |
0e0, 0e0, 0e0, 0e0, 0e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/02-raw-c2c.t :107: |
is-deeply ($back.list »/» 54)[0, 2 … *]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/03-raw-r2c.t :15: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/03-raw-r2c.t :16: |
(21e0, 0e0, -3e0, 5.196152422706632e0, -3e0, 1.7320508075688772e0, -3e0, 0e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/03-raw-r2c.t :21: |
is-deeply ($back.list »/» 6)[^6]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :15: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :16: |
(35e0, -10.47213595499958e0, 0e0, -1.5278640450004204e0, 0e0, -1e0)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :21: |
is-deeply ($back.list »/» 10)[^6]».round(10⁻¹²), # n=6, 2(n-1) = 10 |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :33: |
is-deeply $out.list».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :34: |
(30.669003872744, -14.535649776006, 8.777722363639, -5.582313722177, 3.371022331653, -1.597704320731)».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/04-raw-r2r.t :39: |
is-deeply ($back.list »/» 14)[^6]».round(10⁻¹²), # n=6, 2(n+1) = 14 |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :28: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :34: |
-3e0 + -5.196152422706632e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :37: |
is-deeply @outreim».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :43: |
-3e0, -5.196152422706632e0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :46: |
is-deeply @outnum».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :47: |
[21e0, -3e0, -3e0, -3e0, -3e0, -3e0,]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :51: |
is-deeply @outr».round(10⁻¹²)».Num, [1e0, 2e0, 3e0, 4e0, 5e0, 6e0], 'inverse transform - Complex output'; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :53: |
is-deeply @outrreim».round(10⁻¹²), [1.0, 0.0, 2.0, 0.0, 3.0, 0.0, 4.0, 0.0, 5.0, 0.0, 6.0, 0.0], |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :56: |
is-deeply @outrnum».round(10⁻¹²), [1.0, 2.0, 3.0, 4.0, 5.0, 6.0], 'inverse transform - Num output'; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :59: |
is-deeply @out2».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :65: |
-3e0 + -5.196152422706632e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :117: |
my Math::FFT::Libfftw3::C2C $fft .= new: data => (1..6)».Complex; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :121: |
my @data = (1..6)».Complex; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :149: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :167: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :171: |
is-deeply @outr».round(10⁻¹²), [1.0+0i, 2.0+0i … 18.0+0i], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :189: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :207: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :211: |
is-deeply @outr».round(10⁻¹²), [1.0+0i, 2.0+0i … 18.0+0i], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :225: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :243: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :247: |
is-deeply @outr».round(10⁻¹²), [1.0+0i, 2.0+0i … 18.0+0i], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :258: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :276: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/05-c2c.t :280: |
is-deeply @outr».round(10⁻¹²), [1.0+0i, 2.0+0i … 18.0+0i], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :24: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :28: |
-3e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :31: |
is-deeply @outreim».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :35: |
-3e0, 0e0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :38: |
is-deeply @outnum».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :39: |
[21e0, -3e0, -3e0, -3e0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :43: |
is-deeply @outr».round(10⁻¹²)».Num, [1e0, 2e0, 3e0, 4e0, 5e0, 6e0], 'inverse transform - Complex output'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :45: |
is-deeply @outrnum».round(10⁻¹²), [1.0, 2.0, 3.0, 4.0, 5.0, 6.0], 'inverse transform - Num output'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :48: |
is-deeply @out2».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :52: |
-3e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :123: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :135: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :139: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :156: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :168: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :172: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :185: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :197: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :201: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :212: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :224: |
0e0 + 0e0i]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/06-r2c.t :228: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :34: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :35: |
[21, -3, -3, -3, 1.732050807569, 5.196152422707]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :39: |
is-deeply @outr».round(10⁻¹²)».Num, [1e0, 2e0, 3e0, 4e0, 5e0, 6e0], 'r2r inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :42: |
is-deeply @out2».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :43: |
[21, -3, -3, -3, 1.732050807569, 5.196152422707]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :114: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :116: |
15.58845726812, 0, 0, 46.76537180436, 0, 0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :120: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :137: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :139: |
15.58845726812, 0, 0, 46.76537180436, 0, 0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :143: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :156: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :158: |
15.58845726812, 0, 0, 46.76537180436, 0, 0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :162: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :173: |
is-deeply @out».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :175: |
15.58845726812, 0, 0, 46.76537180436, 0, 0]».round(10⁻¹²), |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :179: |
is-deeply @outr».round(10⁻¹²), [1.0, 2.0 … 18.0], 'inverse transform'; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :191: |
my @in = (-π, -π + π/10 … π)».sin; |
FRITH/Math-FFT-Libfftw3…/07-r2r.t :198: |
is-deeply @outr».round(10⁻¹²), @in».round(10⁻¹²), 'r2r inverse transform'; |
HANENKAMP/ArrayHash…/ArrayHash.pm6 :658: |
method values() returns List:D { @!array».value.List } |
HANENKAMP/ArrayHash…/ArrayHash.pm6 :659: |
method keys() returns List:D { @!array».key.List } |
HANENKAMP/ArrayHash…/ArrayHash.pm6 :661: |
method kv() returns List:D { @!array».kv.List } |
HANENKAMP/DOM-Tiny…/CSS.pm6 :303: |
make any(|$<joiner>».made); |
HANENKAMP/DOM-Tiny…/CSS.pm6 :313: |
$<node-match>».made, |
HANENKAMP/DOM-Tiny…/CSS.pm6 :314: |
$<join-op>».Str».trim, |
HANENKAMP/DOM-Tiny…/CSS.pm6 :321: |
make all(|$<selector>».made); |
HANENKAMP/DOM-Tiny…/HTML.pm6 :306: |
multi method content(TextNode:D: Node:D @children) { $!text = [~] @children».Str } |
HANENKAMP/DOM-Tiny…/HTML.pm6 :319: |
multi method content(Comment:D: Node:D @children) { $!comment = [~] @children».Str } |
HANENKAMP/DOM-Tiny…/HTML.pm6 :329: |
multi method content(Doctype:D: Node:D @children) { $!doctype = [~] @children».Str } |
HANENKAMP/DOM-Tiny…/HTML.pm6 :339: |
multi method content(PI:D: Node:D @children) { $!pi = [~] @children».Str } |
HANENKAMP/DOM-Tiny…/HTML.pm6 :365: |
$result ~= [~] gather for %!attr.sort».kv -> ($key, $value) { |
HANENKAMP/DOM-Tiny…/HTML.pm6 :460: |
for $<ml-token>».made -> %markup { |
HANENKAMP/DOM-Tiny…/HTML.pm6 :583: |
attr => Hash.new($<attr>».made.grep(*.defined)), |
HANENKAMP/DOM-Tiny…/HTML.pm6 :592: |
attr => Hash.new($<attr>».made.grep(*.defined)), |
HANENKAMP/DOM-Tiny…/HTML.pm6 :602: |
attr => Hash.new($<attr>».made.grep(*.defined)), |
HANENKAMP/DOM-Tiny…/011-dom-basics.t :10: |
my $div := $dom.find('div[id]')».text; |
HANENKAMP/DOM-Tiny…/012-dom-tap.t :8: |
is-deeply $dom.find('[id]')».attr('id'), <a b>, |
HANENKAMP/DOM-Tiny…/016-dom-basic-nav.t :73: |
is-deeply $dom.at('simple').ancestors».tag, ('foo',), |
HANENKAMP/DOM-Tiny…/017-dom-nodes.t :61: |
is $dom.child-nodes.grep({ .type ~~ PI })».remove.first.type, Root, 'right type'; |
HANENKAMP/DOM-Tiny…/018-dom-modify-nodes.t :34: |
is $dom.at('b').child-nodes.first.ancestors».tag.join(','), |
HANENKAMP/DOM-Tiny…/022-dom-deep-nesting.t :41: |
is-deeply $dom.at('p').ancestors».tag, |
HANENKAMP/DOM-Tiny…/029-dom-replace.t :28: |
$dom.find('p')».replace(''); |
HANENKAMP/DOM-Tiny…/029-dom-replace.t :42: |
is $dom.find('p')».remove.first.root.at('b').text, 'whatever', |
HANENKAMP/DOM-Tiny…/029-dom-replace.t :49: |
is $dom.find(':not(div):not(i):not(u)')».strip.first.root, |
HANENKAMP/DOM-Tiny…/029-dom-replace.t :54: |
$dom.at('div').find('div')».strip; |
HANENKAMP/DOM-Tiny…/031-dom-mixed-search-and-tree-walk.t :16: |
my Str @data = gather for $dom.find('table tr')».children.flat -> $td { |
HANENKAMP/DOM-Tiny…/032-dom-rss.t :35: |
is-deeply $dom.at('title').ancestors».tag, <channel rss>, |
HANENKAMP/DOM-Tiny…/112-dom-deep-copy.t :13: |
$dom1.at('p')».content('nix'); |
HANENKAMP/DOM-Tiny…/112-dom-deep-copy.t :21: |
$dom2.at('p')».content('nix'); |
HANENKAMP/Email-Address…/Parser.pm6 :262: |
method mailbox-list($/) { make $<mailbox>».made // $<obs-mbox-list>.made } |
HANENKAMP/Email-Address…/Parser.pm6 :263: |
method address-list($/) { make $<address>».made // $<obs-addr-list>.made } |
HANENKAMP/Email-Address…/Parser.pm6 :278: |
method phrase($/) { make [~] @($<word>».made) // $<obs-phrase>.made } |
HANENKAMP/Email-Address…/Parser.pm6 :301: |
make ($<head>.made, |$<tail>».made); |
HANENKAMP/HTTP-Headers…/Headers.pm6 :95: |
my @pairs = try { self.prepared-values».comb(/ <-[ ; ]>+ /)».grep(/'='/).flat }; |
HANENKAMP/HTTP-Headers…/Headers.pm6 :251: |
for flat @headers».kv -> $k, $v { |
HANENKAMP/HTTP-Headers…/Headers.pm6 :272: |
for flat @headers».kv, %headers.kv -> $k, $v { |
HANENKAMP/HTTP-Headers…/headers.t :105: |
is-deeply([ $h.list».name ], [ |
HANENKAMP/HTTP-Request-Supply…/Test.pm6 :70: |
for @exp».key -> $exp-key { |
HANENKAMP/HTTP-Supply…/Test.pm6 :70: |
for @exp».key -> $exp-key { |
HANENKAMP/Hash-MultiValue…/README.md :23: |
say %mv.all-pairs».fmt("%s: %s").join("\n"); |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :21: |
say %mv.all-pairs».fmt("%s: %s").join("\n"); |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :305: |
@(@all-pairs.grep({ .defined && .key eqv $key })».value) |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :378: |
method all-kv { flat @!all-pairs».kv } |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :380: |
method all-antipairs { flat @!all-pairs».invert } |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :381: |
method all-invert { flat @!all-pairs».antipair } |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :382: |
method all-keys { flat @!all-pairs».key } |
HANENKAMP/Hash-MultiValue…/MultiValue.pm6 :383: |
method all-values { flat @!all-pairs».value } |
HANENKAMP/IO-Glob…/Glob.pm6 :127: |
{ make $<term>».made } |
HANENKAMP/ModelDB…/DBModelHOW.pm6 :48: |
$model.^attributes.grep(ModelDB::Column)».column-name; |
HANENKAMP/ModelDB…/Table.pm6 :273: |
my @set-names = self.escaped-columns(@settings».key); |
HANENKAMP/ModelDB…/Table.pm6 :274: |
my @set-bindings = @settings».value; |
HANENKAMP/Path-Router…/Router.pm6 :25: |
for (|@pairs, |%pairs)».kv -> (Str $path, %options) { |
HANENKAMP/Path-Router…/Router.pm6 :51: |
for (|@pairs, |%pairs)».kv -> (Str $path, %options) { |
HANENKAMP/Smack…/Smack.pm6 :154: |
my $charset = $ct.value.comb(/<-[;]>/)».trim.first(*.starts-with("charset=")); |
HANENKAMP/Smack…/CGI.pm6 :59: |
my $charset = $ct.value.comb(/<-[;]>/)».trim.first(*.starts-with("charset=")); |
HANENKAMP/Smack…/ContentMD5.pm6 :24: |
Digest::MD5::md5($_).list».fmt('%02x').join; |
HANENKAMP/Template-Anti…/README.md :25: |
# $dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/README.md :26: |
# $dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/README.md :27: |
# $dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/README.md :87: |
$dom('title')».content($title); |
HANENKAMP/Template-Anti…/README.md :327: |
$dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/README.md :328: |
$dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/README.md :329: |
$dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/README.md :359: |
$dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/README.md :360: |
$dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/README.md :361: |
$dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/Anti.pm6 :27: |
# $dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/Anti.pm6 :28: |
# $dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/Anti.pm6 :29: |
# $dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/Anti.pm6 :105: |
$dom('title')».content($title); |
HANENKAMP/Template-Anti…/Anti.pm6 :399: |
@codes».(self, $dom, c); |
HANENKAMP/Template-Anti…/Anti.pm6 :404: |
@codes».($dom, c); |
HANENKAMP/Template-Anti…/Anti.pm6 :568: |
$dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/Anti.pm6 :569: |
$dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/Anti.pm6 :570: |
$dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/Anti.pm6 :600: |
$dom('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/Anti.pm6 :601: |
$dom('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/Anti.pm6 :602: |
$dom('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/NodeSet.pm6 :217: |
@!nodes».remove; |
HANENKAMP/Template-Anti…/Selector.pm6 :136: |
my @ancestors = @($/<ancestors>)».made; |
HANENKAMP/Template-Anti…/Selector.pm6 :170: |
my @family = @($/<family>)».made; |
HANENKAMP/Template-Anti…/Selector.pm6 :193: |
my @siblings = @($/<siblings>)».made; |
HANENKAMP/Template-Anti…/Template.pm6 :258: |
%attribs.sort».kv.flatmap: -> ($k, $v) { |
HANENKAMP/Template-Anti…/basic.t :9: |
$at('title, h1')».content($title); |
HANENKAMP/Template-Anti…/basic.t :10: |
$at('h1')».attr(title => $motto); |
HANENKAMP/Template-Anti…/basic.t :11: |
$at('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/library.t :15: |
$at('title, h1')».content($title); |
HANENKAMP/Template-Anti…/library.t :16: |
$at('h1')».attr(title => $motto); |
HANENKAMP/Template-Anti…/library.t :17: |
$at('ul.people li:not(:first-child)')».remove; |
HANENKAMP/Template-Anti…/basic-embed.html :13: |
$at('title, h1')».content(.<title>); |
HANENKAMP/Template-Anti…/basic-embed.html :14: |
$at('h1')».attr(title => .<motto>); |
HANENKAMP/Template-Anti…/basic-embed.html :15: |
$at('ul.people li:not(:first-child)')».remove; |
HMBRAND/Text-CSV…/Notes :1: |
Str.^methods».name.grep: /uni/ |
HMBRAND/Text-CSV…/Notes :3: |
$ p6 -e'Str.^methods».name.say' |
HMBRAND/Text-CSV…/Notes :9: |
$ p6 -e'Num.^methods».name.say' |
HMBRAND/Text-CSV…/Notes :17: |
$ p6 -e'Bool.^methods».name.say' |
HMBRAND/Text-CSV…/CSV.pm :396: |
method hash () { hash $!csv.column_names Z=> @!fields».Str; } |
HMBRAND/Text-CSV…/CSV.pm :399: |
method strings () { @!fields».Str; } |
HMBRAND/Text-CSV…/CSV.pm :920: |
self.fields».Str.Array; |
HMBRAND/Text-CSV…/60_samples.t :30: |
is-deeply ($csv.strings, @olist».text, "As strings"); |
HMBRAND/Text-CSV…/75_hashref.t :81: |
is-deeply ([%gth<c_foo foo zebra>».Str], |
HMBRAND/Text-CSV…/test-t.pl :11: |
$sum = [+] $csv.getline_all($*IN)».map(*.elems); |
HMBRAND/Text-CSV…/test-tuxic.pl :13: |
$sum = [+] $csv.getline_all ($*IN)».map(*.elems); |
HOLLI/Color-Scheme…/.nav-marker-rules :4: |
#marker-rule: /sub\s+(infix|postfix|postcircumfix|prefix):«([\S]+)».*{/||%1 %2||Operator |
JGOFF/Perl6-Parser…/999-regression.t :119: |
bag +« flat @a».comb: 1 |
JGOFF/Perl6-Parser…/rosetta-1.t :98: |
so (sum @b».grep(/' '/,:k).grep(/\d/, :kv)) %% 2; |
JGOFF/Perl6-Parser…/rosetta-1.t :101: |
sub row (@row) { '│' ~ (join '│', @row».¢er) ~ '│' } |
JGOFF/Perl6-Parser…/rosetta-1.t :201: |
sub row (@row) { '│' ~ (join '│', @row».¢er) ~ '│' } |
JGOFF/Perl6-Parser…/rosetta-1.t :264: |
sub save () { join '|', flat @board».list } |
JGOFF/Perl6-Parser…/rosetta-1.t :287: |
constant @digits = (1..9).roll(4)».Str; |
JGOFF/Perl6-Parser…/rosetta-a.t :297: |
my @widths = roundrobin(|@lines).map(*».chars.max); |
JGOFF/Perl6-Parser…/rosetta-a.t :426: |
sub amb (*@c) { gather @c».&dethunk } |
JGOFF/Perl6-Parser…/rosetta-a.t :490: |
%anagram.values.grep( { +@($_) >= $max } )».join(' ')».say; |
JGOFF/Perl6-Parser…/rosetta-a.t :503: |
.flat».value # get all groups of anagrams in the group just selected |
JGOFF/Perl6-Parser…/rosetta-a.t :557: |
say @array».&function; |
JGOFF/Perl6-Parser…/rosetta-a.t :581: |
# $png.set: |((cis( Θ / π ) * Θ).reals »+« ($w/2, $h/2))».Int, 255, 0, 255; |
JGOFF/Perl6-Parser…/rosetta-b.t :264: |
sub benford(@a) { bag +« flat @a».comb: /<( <[ 1..9 ]> )> <[ , . \d ]>*/ } |
JGOFF/Perl6-Parser…/rosetta-b.t :543: |
encode reduce * * 256 + * , 0, ($hash, $checksum)».list |
JGOFF/Perl6-Parser…/rosetta-b.t :709: |
my @b = $s.ords».fmt("%07b")».comb; |
JGOFF/Perl6-Parser…/rosetta-b.t :715: |
my @b = $b.list».fmt("%08b")».comb; |
JGOFF/Perl6-Parser…/rosetta-b.t :718: |
return [~] @b».chr; |
JGOFF/Perl6-Parser…/rosetta-b.t :806: |
when 1 { '{' X~ $_».&crosswalk X~ '}' } |
JGOFF/Perl6-Parser…/rosetta-b.t :807: |
default { $_».&crosswalk } |
JMASLAK/Net-BGP…/bgpmon.pl6 :272: |
say $line ~ @errors».key.join(' '); |
JMASLAK/Net-BGP…/AS-List.pm6 :67: |
{ make $<AS-LIST>».made } |
JMASLAK/Net-BGP…/AS-List.pm6 :74: |
{ make Net::BGP::AS-List.from-list($<ASN>».Int, :!ordered, :$asn32) } |
JMASLAK/Net-BGP…/AS-List.pm6 :79: |
{ make Net::BGP::AS-List.from-list($<ASN>».Int, :ordered, :$asn32) } |
JMASLAK/Net-BGP…/IP.pm6 :42: |
return buf8.new( $ip.split('.')».Int ); |
JMASLAK/Net-BGP…/IP.pm6 :83: |
return :16(@*by16.map({:16(~$_)})».fmt("%04x").join); |
JMASLAK/Net-BGP…/IP.pm6 :172: |
return @*by16.map({:16(~$_)})».fmt("%04x").join(':'); |
JMASLAK/Net-BGP…/IP.pm6 :178: |
my $compact = @*by16.map({:16(~$_)})».fmt("%x").join(':'); |
JMASLAK/Net-BGP…/Update.pm6 :116: |
push @lines, "WITHDRAWN: " ~ $withdrawn».Str ==> join(" "); |
JMASLAK/Net-BGP…/AS-Path.pm6 :42: |
@$aslist».check; # Validate all are proper |
JMASLAK/Net-BGP…/AS-Path.pm6 :105: |
return @(self.as-lists».path-length).sum; |
JMASLAK/Net-BGP…/AS-Path.pm6 :108: |
method as-path(-->Str:D) { (join " ", self.as-lists».Str) } |
JMASLAK/Net-BGP…/AS-Path.pm6 :132: |
my @array = flat self.as-lists».asns; |
JMASLAK/Net-BGP…/AS4-Path.pm6 :41: |
@$aslist».check; # Validate all are proper |
JMASLAK/Net-BGP…/AS4-Path.pm6 :104: |
return @(self.as-lists».path-length).sum; |
JMASLAK/Net-BGP…/AS4-Path.pm6 :107: |
method as4-path(-->Str:D) { (join " ", self.as-lists».Str) } |
JMASLAK/Net-BGP…/AS4-Path.pm6 :110: |
my @array = self.as-lists».asns; |
JMASLAK/Net-BGP…/MP-NLRI.pm6 :159: |
return $buf».fmt("%02x").join; |
JMASLAK/Net-BGP…/MP-NLRI.pm6 :199: |
my Str:D @return = $buf».fmt("%02x").join; |
JMASLAK/Net-BGP…/MP-Unreachable.pm6 :120: |
@return.push: $buf».fmt("%02x").join; |
JMASLAK/Net-BGP…/80-Validator-Aggregation.t :52: |
is @errors».key, «AFMIX AGGR_ASN_DOC AGGR_ID_BOGON», "Errors Found"; |
JMASLAK/Net-BGP…/80-Validator-Aggregation.t :85: |
is @errors».key, «AGGR_ASN_RESERVED», "First message has AGGR_ASN_RESERVED"; |
JMASLAK/Net-BGP…/80-Validator-Aggregation.t :113: |
is @errors».key, «AGGR_ASN_PRIVATE», "Second message has AGGR_ASN_PRIVATE"; |
JMASLAK/Net-BGP…/80-Validator-Aggregation.t :141: |
is @errors».key, «AGGR_ASN_TRANS», "Third message has AGGR_ASN_TRANS"; |
JMASLAK/Net-BGP…/81-Validator-AS-Path.t :44: |
is @errors».key, «AS4_PEER_SENT_AS4_PATH», "Errors Found"; |
JMASLAK/Net-BGP…/81-Validator-AS-Path.t :74: |
is @errors».key, «AS_PATH_DOC», "Errors Found"; |
JMASLAK/Net-BGP…/81-Validator-AS-Path.t :104: |
is @errors».key, «AS_PATH_PRIVATE», "Errors Found"; |
JMASLAK/Net-BGP…/81-Validator-AS-Path.t :134: |
is @errors».key, «AS_PATH_RESERVED», "Errors Found"; |
JMASLAK/Net-BGP…/81-Validator-AS-Path.t :164: |
is @errors».key, «AS_PATH_TRANS», "Errors Found"; |
JNTHN/cro…/Runner.pm6 :151: |
|| $cro-file.links».service ⊆ %services.keys { |
KAIEPI/Digest-BubbleBabble…/BubbleBabble.pm6 :11: |
constant VOWELS = <a e i o u y>».ord; |
KAIEPI/Digest-BubbleBabble…/BubbleBabble.pm6 :12: |
constant CONSONANTS = <b c d f g h k l m n p r s t v z x>».ord; |
LEONT/Getopt-Long…/Long.pm :154: |
{ make @<name>».Str.list } |
LEONT/TAP…/TAP.pm :265: |
make TAP::Sub-Test.new(:raw(~$/), :entries(@<sub-entry>».made), |self!make_test($<test>)); |
LEONT/TAP…/TAP.pm :390: |
$!longest = @names ?? @names».chars.max !! 12; |
LEONT/TAP…/TAP.pm :961: |
@working».<parser>».kill; |
MORITZ/JSON-Tiny…/Tiny.pm :35: |
$_.Str.encode('utf-16').values».fmt('\u%04x').join |
MORITZ/Math-Model…/spring-freq.pl :32: |
my @ampl = (%h<time>.flat Z=> %h<height>.flat).grep({.key >= 50})».value; |
MORITZ/Math-Model…/spring.pl :31: |
my @ampl = (%h<time>.flat Z=> %h<height>.flat).grep({.key >= 30})».value; |
MORITZ/Math-Model…/Model.pm :34: |
&c.signature.params».name».substr(1).grep({ $_ ne '_'}); |
MORITZ/Math-RungeKutta…/RungeKutta.pm :83: |
my $err = ([max] (@y-halfstep »-« @y-new)».abs) / $step; |
SAMCV/Git-Log…/Log.pm6 :77: |
my $format = '--pretty=format:' ~ @fields».value.join($column-sep) ~ $commit-sep; |
SAMCV/Git-Log…/Log.pm6 :90: |
my %thing = %( @fields».key Z=> $entry.split($column-sep) ); |
SKAJI/App-Mi6…/INI.pm6 :28: |
my %hash = $<sections>».ast.hash; |
SKAJI/App-Mi6…/INI.pm6 :32: |
method toplevel ($/) { make $<keyval>».ast } |
SKAJI/App-Mi6…/INI.pm6 :33: |
method sections ($/) { make $<header><text>.Str => $<keyval>».ast } |
TYIL/App-Assixt…/Bootstrap.pm6 :15: |
my $formatted-type = $type.split("-", :g)».tclc.join(); |
TYIL/App-Assixt…/Meta.pm6 :24: |
my $formatted-type = $type.split("-", :g)».tclc.join(); |
TYIL/App-Assixt…/Touch.pm6 :13: |
my $formatted-type = $type.split("-", :g)».tclc.join(); |
UFOBAT/Temp-Path…/Path.pm6 :32: |
).join.encode('utf8-c8').&sha256».fmt('%02X').join; |
0racle/p6-Net-Netmask…/README.md :158: |
if ( any @blacklist».match($host) ) { |
0racle/p6-Net-Netmask…/README.md :244: |
say $net2.nth(^2, :30bit :nets)».nth(^2); |
0racle/p6-Net-Netmask…/Netmask.pm6 :168: |
if ( any @blacklist».match($host) ) { |
0racle/p6-Net-Netmask…/Netmask.pm6 :268: |
say $net2.nth(^2, :30bit :nets)».nth(^2); |
0racle/p6-Net-Netmask…/01-basic.t :262: |
is $net192.nth(^2, :30bit :nets)».nth(^2), |
0racle/p6-Net-Netmask…/02-doctest.t :76: |
ok ( any @blacklist».match($host) ), "$host is blacklisted"; |
0racle/p6-Net-Netmask…/02-doctest.t :127: |
is $net2.nth(^2, :30bit :nets)».nth(^2), |
AlexDaniel/orgsleep…/bdf2json :43: |
@bitmap.push: $conv.substr(0, $width).comb».Int».so.Array; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :51: |
make $<VariableDefinition>».made; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :65: |
make $<Selection>».made |
CurtTilmes/Perl6-GraphQL…/Actions.pm :163: |
make $<str>».made.join; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :216: |
make %( $<ObjectField>».made ); |
CurtTilmes/Perl6-GraphQL…/Actions.pm :264: |
make $<Field>».made; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :337: |
make $<Value>».made; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :353: |
make $<EnumValue>».made; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :400: |
make $<ArgumentDefinition>».made; |
CurtTilmes/Perl6-GraphQL…/Actions.pm :426: |
make $<InputField>».made; |
CurtTilmes/Perl6-GraphQL…/Compare.pm :19: |
$l.possibleTypes».name eqv $r.possibleTypes».name; |
CurtTilmes/Perl6-GraphQL…/Compare.pm :28: |
$l.interfaces».name eqv $r.interfaces».name; |
CurtTilmes/Perl6-GraphQL…/Compare.pm :36: |
$l.possibleTypes».name eqv $r.possibleTypes».name; |
CurtTilmes/Perl6-GraphQL…/Types.pm :17: |
$!description = $<Comment>».made.join(' '); |
CurtTilmes/Perl6-GraphQL…/Types.pm :245: |
"union $.name = { (@!possibleTypes».name).join(' | ') }\n"; |
CurtTilmes/Perl6-GraphQL…/Types.pm :277: |
('implements ' ~ (@!interfaces».name).join(', ') ~ ' ' |
FCO/Test-Fuzz…/Fuzz.pm6 :40: |
(%funcs{@funcs}:v)».run-tests: |($_ with $runs) |
FROGGS/p6-Digest-PSHA1…/PSHA1.pm :40: |
psha1($clientbytes, $serverbytes, $keysize).list».fmt("%02x").join; |
FROGGS/p6-IDNA-Punycode…/Punycode.pm :73: |
warn @output».fmt('%04x') if $DEBUG; |
Kaiepi/p6-Digest-BubbleBabble…/BubbleBabble.pm6 :11: |
constant VOWELS = <a e i o u y>».ord; |
Kaiepi/p6-Digest-BubbleBabble…/BubbleBabble.pm6 :12: |
constant CONSONANTS = <b c d f g h k l m n p r s t v z x>».ord; |
LLFourn/p6-CompUnit-Util…/01-utils.t :14: |
ok all-loaded()».short-name ~~ set('CompUnit::Util','NativeCall','Test'), |
LLFourn/p6-OO-Schema…/README.md :107: |
say "pass me one of:\n" ~ Userland.children(:all)».^name.join("\n"); |
LLFourn/p6-OO-Schema…/Schema.pm6 :44: |
|self.^children, |(self.^children».children(:all) if $all); |
LLFourn/p6-OO-Schema…/Schema.pm6 :114: |
submethod children(:$all) { flat self.^children,(|self.^children».children(:all) if $all) }; |
MadcapJake/Test-Lab…/splits.pl6 :63: |
([\,] @ls) Z (([\,] @ls[1..*].reverse)».reverse).reverse |
Mouq/toml-pm6…/Grammar.pm6 :72: |
%table{.key} = .value for @<keyvalue>».ast; |
Mouq/toml-pm6…/Grammar.pm6 :82: |
%table{.key} = .value for @<keyvalue>».ast; |
Tux/CSV…/Notes :1: |
Str.^methods».name.grep: /uni/ |
Tux/CSV…/Notes :3: |
$ p6 -e'Str.^methods».name.say' |
Tux/CSV…/Notes :9: |
$ p6 -e'Num.^methods».name.say' |
Tux/CSV…/Notes :17: |
$ p6 -e'Bool.^methods».name.say' |
Tux/CSV…/CSV.pm :396: |
method hash () { hash $!csv.column_names Z=> @!fields».Str; } |
Tux/CSV…/CSV.pm :399: |
method strings () { @!fields».Str; } |
Tux/CSV…/CSV.pm :920: |
self.fields».Str.Array; |
Tux/CSV…/60_samples.t :30: |
is-deeply ($csv.strings, @olist».text, "As strings"); |
Tux/CSV…/75_hashref.t :81: |
is-deeply ([%gth<c_foo foo zebra>».Str], |
Tux/CSV…/test-t.pl :11: |
$sum = [+] $csv.getline_all($*IN)».map(*.elems); |
Tux/CSV…/test-tuxic.pl :13: |
$sum = [+] $csv.getline_all ($*IN)».map(*.elems); |
Util/Perl6-Math-Quaternion…/math_with_complex.t :9: |
is-deeply( [$got.coeffs».Num], [@expected».Num], $reason ); |
ab5tract/Terminal-Print…/attacks.p6 :333: |
has @.symbols = (0x263F .. 0x2653).pick(*)».chr; |
ab5tract/Terminal-Print…/clock.p6 :10: |
my $width = @lines».chars.max; |
ab5tract/Terminal-Print…/rpg-ui.p6 :551: |
@rows.append: wrap-text($.w - 2, $spells, ' ')».fmt($body-row); |
ab5tract/Terminal-Print…/rpg-ui.p6 :720: |
my $w = @lines».chars.max; |
ab5tract/Terminal-Print…/rpg-ui.p6 :1183: |
has @.symbols = (0x263F .. 0x2653).pick(*)».chr; |
ab5tract/Terminal-Print…/tris.p6 :147: |
my @xs = %minos{$mino}[$orientation]».[0]; |
bduggan/p6-digest-sha1-native…/README.md :14: |
say sha1("The quick brown fox jumps over the lazy dog")».fmt('%02x').join; |
bduggan/p6-digest-sha1-native…/Native.pm6 :21: |
my $str = $hash.list».chr.join.lc; |
bradclawsie/WebService-AWS-V4…/V4.pm6 :176: |
[~] $sha256.list».fmt: "%02x"; |
cedric-vincent/kains…/Commandline.pm6 :72: |
or ! all @callback-args».defined; |
cedric-vincent/kains…/Commandline.pm6 :89: |
say "$_ { $p.callback.signature.params».name }" for $p.switches; |
cedric-vincent/kains…/Commandline.pm6 :104: |
params => .callback.signature.params».name, |
cjfields/bioperl6…/Range.pm6 :92: |
#$union_strand = 0 if any(@ranges».strand) != $union_strand; |
cjfields/bioperl6…/Range.t :255: |
is(join(',', @sub1».Str), %subtract_tests{$set}{$st}[0], "subtract" ); |
cjfields/bioperl6…/Range.t :256: |
is(join(',', @sub2».Str), %subtract_tests{$set}{$st}[1], "subtract"); |
colomon/ABC…/abc2ly :542: |
substr @s[0], 0, [+] [\and] [Zeqv] |@s».ords |
colomon/ABC…/Actions.pm :173: |
my @bar = @( $<element> )».ast; |
colomon/Math-Polynomial…/Polynomial.pm :25: |
"Math::Polynomial.new(" ~ @.coefficients».perl.join(', ') ~ ")"; |
colomon/Test-Junkie…/Junkie.pm :31: |
shell "PERL6LIB=lib prove -v -e perl6 @tests».path.sort()"; |
cosimo/perl6-digest-md5…/MD5.pm :59: |
md5( $str.encode('latin-1') ).list».fmt('%02x').join |
cosimo/perl6-digest-md5…/MD5.pm :63: |
md5( @str.join.encode('latin-1') ).list».fmt('%02x').join |
daleevans/perl6-Text-Spintax…/Spintax.pm6 :150: |
my @children = $<sequence>».ast; |
dnmfarrell/Pod-PerlTricks…/ToJSON.pm6 :90: |
@.meta.push("keywords" => [$match<name>.values».made]); |
drforr/perl6-Perl6-Parser…/999-regression.t :119: |
bag +« flat @a».comb: 1 |
drforr/perl6-Perl6-Parser…/rosetta-1.t :98: |
so (sum @b».grep(/' '/,:k).grep(/\d/, :kv)) %% 2; |
drforr/perl6-Perl6-Parser…/rosetta-1.t :101: |
sub row (@row) { '│' ~ (join '│', @row».¢er) ~ '│' } |
drforr/perl6-Perl6-Parser…/rosetta-1.t :201: |
sub row (@row) { '│' ~ (join '│', @row».¢er) ~ '│' } |
drforr/perl6-Perl6-Parser…/rosetta-1.t :264: |
sub save () { join '|', flat @board».list } |
drforr/perl6-Perl6-Parser…/rosetta-1.t :287: |
constant @digits = (1..9).roll(4)».Str; |
drforr/perl6-Perl6-Parser…/rosetta-a.t :297: |
my @widths = roundrobin(|@lines).map(*».chars.max); |
drforr/perl6-Perl6-Parser…/rosetta-a.t :426: |
sub amb (*@c) { gather @c».&dethunk } |
drforr/perl6-Perl6-Parser…/rosetta-a.t :490: |
%anagram.values.grep( { +@($_) >= $max } )».join(' ')».say; |
drforr/perl6-Perl6-Parser…/rosetta-a.t :503: |
.flat».value # get all groups of anagrams in the group just selected |
drforr/perl6-Perl6-Parser…/rosetta-a.t :557: |
say @array».&function; |
drforr/perl6-Perl6-Parser…/rosetta-a.t :581: |
# $png.set: |((cis( Θ / π ) * Θ).reals »+« ($w/2, $h/2))».Int, 255, 0, 255; |
drforr/perl6-Perl6-Parser…/rosetta-b.t :264: |
sub benford(@a) { bag +« flat @a».comb: /<( <[ 1..9 ]> )> <[ , . \d ]>*/ } |
drforr/perl6-Perl6-Parser…/rosetta-b.t :543: |
encode reduce * * 256 + * , 0, ($hash, $checksum)».list |
drforr/perl6-Perl6-Parser…/rosetta-b.t :709: |
my @b = $s.ords».fmt("%07b")».comb; |
drforr/perl6-Perl6-Parser…/rosetta-b.t :715: |
my @b = $b.list».fmt("%08b")».comb; |
drforr/perl6-Perl6-Parser…/rosetta-b.t :718: |
return [~] @b».chr; |
drforr/perl6-Perl6-Parser…/rosetta-b.t :806: |
when 1 { '{' X~ $_».&crosswalk X~ '}' } |
drforr/perl6-Perl6-Parser…/rosetta-b.t :807: |
default { $_».&crosswalk } |
finanalyst/pod-render…/Processed.pm6 :290: |
$pf.completion($in-level,'zero', %() ) ~ $pf.completion($in-level, 'raw', %( :contents( [~] $node.contents».&handle($in-level, $pf ) ) ) ) |
fjwhittle/p6-Path-Map…/Map.pm6 :290: |
})».key; |
gfldex/perl6-concurrent-file-find…/Find.pm6 :114: |
$channel.send(.&return-type) if all @tests».(.IO); |
gfldex/perl6-concurrent-file-find…/Find.pm6 :116: |
.IO.dir().sort({.e && .f}).map(&?BLOCK) if $recursive && .&max-depth && all @dir-tests».(.IO) |
gfldex/perl6-concurrent-file-find…/Find.pm6 :143: |
.IO.dir()».&?BLOCK if .IO.e && .IO.d; |
gfldex/perl6-git-config…/Config.pm6 :18: |
my $cfg-handle = ([||] @fs».IO».open) || warn("Can not find gitconfig at any of {('⟨' «~« @fs »~» '⟩').join(', ')}"); |
gfldex/perl6-meta6-bin…/bin.pm6 :49: |
my @path = "%*ENV<HOME>/.meta6"».IO; |
gfldex/perl6-meta6-bin…/bin.pm6 :61: |
try @path».child($basename).grep({.e & .r}).first |
gfldex/perl6-meta6-bin…/bin.pm6 :158: |
@tracked-files.append: copy-skeleton-files($base-dir)».IO».basename; |
gfldex/perl6-meta6-bin…/bin.pm6 :241: |
# (note BOLD "Dependency to $add-dep already in META6.json."; return) if $add-dep.&simple-version ∈ $meta6<depends>».&simple-version; |
gfldex/perl6-meta6-bin…/bin.pm6 :516: |
$git-response.lines».substr(41) |
gfldex/perl6-meta6-bin…/bin.pm6 :580: |
@skeleton-files».©-file($base-dir) |
gfldex/perl6-meta6-bin…/bin.pm6 :619: |
».chomp\ |
gfldex/perl6-meta6-bin…/bin.pm6 :622: |
».split(/\s* '=' \s*/)\ |
grondilu/chess…/FEN.pm6 :27: |
$<board><rank>».made.join("\n") |
grondilu/clifford…/Optimized.pm6 :29: |
:basis[@pairs».key], |
grondilu/clifford…/Optimized.pm6 :30: |
:reals[@pairs».value]; |
grondilu/clifford…/Optimized.pm6 :79: |
.map({ (.key) => .value».value }) |
grondilu/clifford…/Optimized.pm6 :82: |
my @keys = @classif».key; |
grondilu/clifford…/Optimized.pm6 :83: |
my @values = @classif».value; |
grondilu/libdigest-perl6…/README.md :12: |
sub buf_to_hex { [~] $^buf.list».fmt: "%02x" } |
grondilu/libdigest-perl6…/digest.t :6: |
is md5(''.encode: 'ascii').list».fmt("%02x").join, 'd41d8cd98f00b204e9800998ecf8427e', "empty string"; |
grondilu/libdigest-perl6…/digest.t :7: |
is md5('a'.encode: 'ascii').list».fmt("%02x").join, '0cc175b9c0f1b6a831c399e269772661', "a"; |
grondilu/libdigest-perl6…/digest.t :8: |
is md5('abc'.encode: 'ascii').list».fmt("%02x").join, '900150983cd24fb0d6963f7d28e17f72', "abc"; |
grondilu/libdigest-perl6…/digest.t :18: |
my $digest = md5($msg.encode('ascii')).list».fmt('%02x').join; |
grondilu/libdigest-perl6…/ripemd.t :9: |
is $rmd160.list».fmt("%02x").join, 'daba326b8e276af34297f879f6234bcef2528efa', "rmd160"; |
grondilu/libdigest-perl6…/sha.t :8: |
my $sha1 = [~] .list».fmt: "%02x" given sha1 $test-buf; |
grondilu/libdigest-perl6…/sha.t :9: |
my $sha256 = [~] .list».fmt: "%02x" given sha256 $test-buf; |
hipek8/p6-UNIX-Daemonize…/Daemonize.pm6 :44: |
($*OUT,$*ERR,$*IN)».close; |
jamesneko/dice-roller…/Roller.pm6 :179: |
@!dice».roll; |
jamesneko/dice-roller…/Roller.pm6 :195: |
if any(@!dice».value) { |
jamesneko/dice-roller…/Roller.pm6 :210: |
return @!operations».value; |
jamesneko/dice-roller…/Roller.pm6 :251: |
return @!rolls».total; |
jamesneko/dice-roller…/Roller.pm6 :267: |
make RollSet.new( rolls => $<expression>».made ); |
jamesneko/dice-roller…/Roller.pm6 :306: |
my Dice::Roller::Selector @selectors = $<selector>».made; |
jamesneko/dice-roller…/Rollable.pm6 :13: |
self.contents».roll; |
jamesneko/dice-roller…/Rollable.pm6 :19: |
self.contents».set-max; |
jamesneko/dice-roller…/Rollable.pm6 :25: |
self.contents».set-min; |
jamesneko/dice-roller…/Rollable.pm6 :41: |
return [+] self.contents».total; |
japhb/RPG-Base…/Party.pm6 :12: |
~ (': ' ~ @members».name.join(', ') if @members) |
japhb/RPG-Base…/ThingContainer.pm6 :79: |
@!contents = @!contents».clone; |
jnthn/p6-docker-file…/File.pm6 :205: |
$_.Str.encode('utf-16').values».fmt('\u%04x').join |
jsimonet/IRC-Client-Plugin-UserPoints…/UserPoints.pm6 :87: |
?? $<nicks>».Str |
jsimonet/IRC-Client-Plugin-UserPoints…/UserPoints.pm6 :121: |
?? $<nicks>».Str |
jsimonet/dns-zone…/ModernActions.pm6 :38: |
# rr => grep( { $_.ast ~~ ResourceRecord }, @<entry> )».ast |
jsimonet/dns-zone…/ModernActions.pm6 :40: |
make grep( { $_.ast ~~ DNS::Zone::ResourceRecord }, @<entry> )».ast; |
kalkin/License-Software…/Software.pm6 :171: |
for get-all() -> $license { return $license if $alias.uc ∈ $license.aliases».uc } |
kalkin/License-Software…/Abstract.pm6 :31: |
return join "\n", ($.copyright «~» @.holders».name); |
kalkin/Pod-To-Latex…/Latex.pm6 :87: |
when Positional { .flat».&pod2text.grep(?*).join: "\n\n" } |
kalkin/Pod-To-Latex…/Latex.pm6 :164: |
default { $pod.type ~ ' → ' ~ $pod.contents».&pod2text.join } |
labster/p6-File-Spec-Case…/Case.pm :61: |
return +$path.parent.dir».basename.grep(/:i ^ {$path.basename} $/) <= 1; |
labster/p6-Lingua-Number…/Number.pm6 :15: |
my @rulesets := $xml.elements(:TAG<rbnf>)[0].elements(:TAG<rulesetGrouping>)».elements(:TAG<ruleset>); |
labster/p6-Lingua-Number…/Number.pm6 :150: |
[~] ($match<begin>».Str, (@items Z $match<text>».Str)); |
labster/perl6-File-Compare…/Compare.pm6 :43: |
my @file_paths = @file_list.».IO.grep: { .r }; |
labster/perl6-File-Compare…/Compare.pm6 :48: |
my @sizes = @file_paths».s; |
labster/perl6-File-Compare…/Compare.pm6 :50: |
my @file = @file_paths».open; |
labster/perl6-File-Compare…/Compare.pm6 :66: |
# TODO: check and see if @file».seek(0, SeekFromBeginning) would be faster anyway |
labster/perl6-File-Compare…/Compare.pm6 :67: |
@file[grep {%skip{$_}.not}, @index]».seek(0, SeekFromBeginning); |
labster/perl6-File-Compare…/01-multiple.t :44: |
is sort-arrays(compare_multiple_files(@filelist».IO)), |
labster/perl6-File-Find-Duplicates…/Duplicates.pm6 :14: |
else { @files = @dirs».IO».dir».Slip.flat } |
labster/perl6-File-Find-Duplicates…/Duplicates.pm6 :55: |
for @files -> $f { %checksums.push( md5( $f.IO.slurp(:bin) ).list».fmt("%02x").join => $f)} |
labster/perl6-File-Find-Duplicates…/Duplicates.pm6 :72: |
if $sameline { $f».path.say } |
labster/perl6-File-Find-Duplicates…/Duplicates.pm6 :73: |
else { $f».path».say; print "\n"; } |
labster/perl6-File-Find-Duplicates…/Duplicates.pm6 :90: |
say "First set: {@dupes[0]».path.join(', ')}" |
leont/yamlish…/YAMLish.pm6 :502: |
make ( @<document>».ast ); |
leont/yamlish…/YAMLish.pm6 :519: |
%directives<tags> = @<tag-directive>».ast.list; |
leont/yamlish…/YAMLish.pm6 :541: |
make [ Mapping, @<map-entry>».ast ]; |
leont/yamlish…/YAMLish.pm6 :550: |
make [ Sequence, @<list-entry>».ast ]; |
leont/yamlish…/YAMLish.pm6 :566: |
my $value = @<str>».ast.join; |
leont/yamlish…/YAMLish.pm6 :581: |
my $value = @<str>».ast.join; |
leont/yamlish…/YAMLish.pm6 :675: |
make @<pair>».ast.list; |
leont/yamlish…/YAMLish.pm6 :689: |
make @<inline>».ast.list; |
leont/yamlish…/YAMLish.pm6 :702: |
my $url = @<uri-char>».ast.join(''); |
leont/yamlish…/YAMLish.pm6 :715: |
make ShortHandTag.new(:namespace($<tag-handle>.ast), :local(@<tag-char>».ast.join(''))); |
leont/yamlish…/YAMLish.pm6 :893: |
{ make DateTime.new(|$/.hash».Int) } |
leont/yamlish…/YAMLish.pm6 :897: |
{ make Date.new(|$/.hash».Int) } |
lestrrat/p6-Apache-LogFormat…/Compiler.pm6 :64: |
q!~ ~ $<expr>».made.join("") ~ q~!; |
lestrrat/p6-Crust-Middleware-Session…/Session.pm6 :87: |
return [~] $buf.list».fmt: "%02x"; |
madcapjake/p6dx…/p6dx :31: |
)».IO.flat.list; |
madcapjake/p6dx…/p6dx :41: |
)».IO.flat.list; |
madcapjake/p6dx…/p6dx :53: |
find(:dir('.'), :type('file'), :name(rx!(\.p[m|l]?6?)$!))».IO.flat.list; |
madcapjake/p6dx…/Clairvoyant.pm6 :6: |
find( :dir($dir), :type('file'), :name(rx!(\.p[m|l]?6?)$!) )».IO.flat.list; |
madcapjake/rabble…/Compiler.pm6 :34: |
my Map @internals = $<Expression>».made; |
madcapjake/rabble…/Compiler.pm6 :44: |
my &block = compile-words($<Expression>».made); |
madcapjake/rabble…/Compiler.pm6 :53: |
for $<Expression>».made.grep(* !~~ Nil) { |
masak/007…/Builtins.pm6 :333: |
my @elements = .value.signature.params».name».&ditch-sigil».¶meter; |
masak/007…/Builtins.pm6 :344: |
my @elements = .value.qtype.attributes».name».substr(2).grep({ $_ ne "identifier" })».¶meter; |
masak/007…/Builtins.pm6 :353: |
my @elements = &fn.signature.params».name».&ditch-sigil».¶meter; |
masak/007…/Actions.pm6 :88: |
make Q::StatementList.new(:statements(Val::Array.new(:elements($<statement>».ast)))); |
masak/007…/Actions.pm6 :206: |
my @traits = $<trait>».ast; |
masak/007…/Actions.pm6 :342: |
for $<infix>».ast Z $<termish>[1..*]».ast -> ($infix, $term) { |
masak/007…/Actions.pm6 :497: |
make Q::Term::Array.new(:elements(Val::Array.new(:elements($<EXPR>».ast)))); |
masak/007…/Actions.pm6 :502: |
make Q::Term::Tuple.new(:elements(Val::Tuple.new(:elements($<EXPR>».ast)))); |
masak/007…/Actions.pm6 :510: |
make Q::Regex::Alternation.new(:alternatives($<regex-group>».ast)); |
masak/007…/Actions.pm6 :514: |
make Q::Regex::Group.new(:fragments($<regex-quantified>».ast)); |
masak/007…/Actions.pm6 :678: |
unless $property eq any($<propertylist>.ast.properties.elements».key».value); |
masak/007…/Actions.pm6 :702: |
for $<property>».ast -> Q::Property $p { |
masak/007…/Actions.pm6 :708: |
make Q::PropertyList.new(:properties(Val::Array.new(:elements($<property>».ast)))); |
masak/007…/Actions.pm6 :796: |
make Q::ArgumentList.new(:arguments(Val::Array.new(:elements($<EXPR>».ast)))); |
masak/007…/Actions.pm6 :800: |
make Q::ParameterList.new(:parameters(Val::Array.new(:elements($<parameter>».ast)))); |
masak/007…/Runtime.pm6 :244: |
my @elements = &fn.signature.params».name».&ditch-sigil».¶meter; |
masak/007…/Val.pm6 :656: |
sprintf "(%s)", $.parameterlist.parameters.elements».identifier».name.join(", "); |
masak/007…/quicksort.t :10: |
my @values = @0».Int; |
masak/007…/quicksort.t :18: |
my @values = @0».Int; |
masak/007…/meta-info.t :5: |
my @lib-pms = find("lib", / ".pm6" $/)».Str; |
masak/crypt…/Hanoi.pm :294: |
my @args = .&munge.words[1..*]».&unmunge; |
masak/yapsi…/Yapsi.pm :189: |
$block.children.append: $<statementlist><statement>».ast.grep(*.defined); |
moritz/Math-Model…/spring-freq.pl :32: |
my @ampl = (%h<time>.flat Z=> %h<height>.flat).grep({.key >= 50})».value; |
moritz/Math-Model…/spring.pl :31: |
my @ampl = (%h<time>.flat Z=> %h<height>.flat).grep({.key >= 30})».value; |
moritz/Math-Model…/Model.pm :34: |
&c.signature.params».name».substr(1).grep({ $_ ne '_'}); |
ohmycloud/fanfou-p6…/FanFou.pm6 :114: |
my %oauth_token = (await $resp.body-text()).Str.split('&')».split('=').flat.hash; |
ohmycloud/fanfou-p6…/FanFou.pm6 :124: |
%oauth_token = (await $resp.body-text()).Str.split('&')».split('=').flat.hash; |
ohmycloud/fanfou-p6…/FanFou.pm6 :145: |
my %oauth_token = (await $resp.body-text()).Str.split('&')».split('=').flat.hash; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :31: |
my Str $name = Buf.new( $<name-bytes>».ast ).decode; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :36: |
my $xdigits = [~] $<xdigit>».Str; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :38: |
my $hex-string = [~] @hex-codes».chr; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :65: |
my $literal = [~] $<literal>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :74: |
my @array = @<object>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :79: |
my @names = @<name>».ast.map: *.value; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :80: |
my @objects = @<object>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :16: |
my $body = [ $<body>».ast.map({ .value }) ]; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :79: |
my $objects = [ $<ind-obj>».ast ]; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :93: |
my $xref = [ $<xref-section>».ast ]; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :100: |
my List $rows = $<xref-entry>».ast.List; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :138: |
method object-stream-index($/) { make [ $<object-stream-indice>».ast ] } |
p6-pdf/PDF-Grammar-p6…/Actions.pm :11: |
my @result = $/<op>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :65: |
my @objects = @<object>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :11: |
my @expr = $<statement>».ast; |
p6-pdf/PDF-Grammar-p6…/Actions.pm :9: |
my @entries = $<xref-entry>».ast; |
patch/geo-region-pm6…/Region.pm :87: |
build_parents(%children_of.grep( *.value ∋ $^region )».key) |
perl6/Blin…/blin.p6 :250: |
next unless .key eq .value».name.any; # proceed only if not an alias |
perl6/Blin…/blin.p6 :290: |
$str ~= ‘ (left: ’ ~ @undone».name ~ ‘)’ if @undone ≤ 5; |
perl6/Blin…/blin.p6 :308: |
whenever Promise.allof($module.depends.keys».done) { |
perl6/Blin…/blin.p6 :345: |
await @modules».done; |
perl6/doc…/5to6-nutshell.pod6 :869: |
variable to a C«<->». When translating from Perl 5, inspect the use of the loop variable to decide if |
perl6/doc…/5to6-nutshell.pod6 :1047: |
require you to add the optional C<m> on a plain match like C«/abc/». |
perl6/doc…/5to6-nutshell.pod6 :1073: |
surrounded by C<()>, the assertions will be surrounded by C«<>». |
perl6/doc…/5to6-nutshell.pod6 :1101: |
For more info see L«lookahead assertions|/language/regexes#Lookahead_assertions_<?before_pattern>». |
perl6/doc…/5to6-perlfunc.pod6 :207: |
L«C<$?LINE>|/language/variables#Compile-time_variables». For many purposes, |
perl6/doc…/5to6-perlfunc.pod6 :894: |
L«C<Proc::Async.kill> method|/type/Proc::Async#method_kill». |
perl6/doc…/classtut.pod6 :38: |
0, y => 0)». |
perl6/doc…/classtut.pod6 :695: |
say $o.^methods(:local)».name.join(', '); |
perl6/doc…/containers.pod6 :291: |
elements including the elements of the included array, except for C«(9 10)». |
perl6/doc…/control.pod6 :492: |
to be read-write, use C«<->» instead of C«->». If you need to make C<$_> |
perl6/doc…/create-cli.pod6 :286: |
C<#|(...)> Pod block to set L«C<WHY>|/routine/WHY». |
perl6/doc…/faq.pod6 :462: |
my @bar = <hello world>».subst-mutate: 'h', 'H'; |
perl6/doc…/faq.pod6 :473: |
my @bar = <hello world>».subst: 'h', 'H'; # ['Hello','world'] |
perl6/doc…/faq.pod6 :629: |
to use the L«rakudo-specific C<dd> routine|/programs/01-debugging#Dumper_function_dd». |
perl6/doc…/faq.pod6 :801: |
these can be used thanks to parallelism, both implicit (e.g., with the C«>>». |
perl6/doc…/glossary.pod6 :1225: |
example is the space character « ». |
perl6/doc…/grammar_tutorial.pod6 :611: |
C<subject-id> and have it set to element 0 of C«<data>». |
perl6/doc…/grammars.pod6 :163: |
grammar: C«method calc-op:sym<add>» and C«method calc-op:sym<sub>». |
perl6/doc…/grammars.pod6 :421: |
say $<field>».invalid; |
perl6/doc…/grammars.pod6 :560: |
$match.make: $match<pair>».made |
perl6/doc…/io-guide.pod6 :267: |
value of the L«C<$.CWD> attribute|/type/IO::Path#attribute_CWD». For example, this |
perl6/doc…/io-guide.pod6 :298: |
L«C<$.CWD> attribute|/type/IO::Path#attribute_CWD». This means there are two |
perl6/doc…/iterating.pod6 :32: |
say @longer-chain».join("").join("|"); #OUTPUT: «ACG|TAC|GTT» |
perl6/doc…/js-nutshell.pod6 :317: |
In Perl 6, there is no equivalent to C«>>>». All bitwise operators are |
perl6/doc…/modules-core.pod6 :16: |
=item L«C<CompUnit::Repository::Staging>|https://github.com/rakudo/rakudo/blob/master/lib/CompUnit/Repository/Staging.pm6». |
perl6/doc…/modules.pod6 :520: |
Be careful I<not> to put C<sub EXPORT> after L«C<unit> declarator|/syntax/unit». |
perl6/doc…/numerics.pod6 :338: |
parameters of L«C<sub MAIN>|/language/functions#sub_MAIN». |
perl6/doc…/numerics.pod6 :694: |
(my int $ = 2)». The compiler knows the literal is small enough to fit to a |
perl6/doc…/operators.pod6 :193: |
Alternatively, use the L«C<.subst> method|/routine/subst». |
perl6/doc…/operators.pod6 :206: |
same adverbs as L«C<Str.trans>|/routine/trans». Returns the StrDistance object |
perl6/doc…/operators.pod6 :285: |
and C«>>». They apply a given operator enclosed (or preceded or followed, in the case of unary operators) by C<«> and/or C<»> to one or two |
perl6/doc…/operators.pod6 :323: |
my @results = @objs».take-care(); |
perl6/doc…/operators.pod6 :326: |
@slops».?this-method-may-not-exist(); |
perl6/doc…/operators.pod6 :372: |
chain. For the hyper method call operator (».), the nodality of the target |
perl6/doc…/operators.pod6 :375: |
say (<a b>, <c d e>)».elems; # OUTPUT: «(2 3)» |
perl6/doc…/operators.pod6 :376: |
say (<a b>, <c d e>)».&{ .elems }; # OUTPUT: «((1 1) (1 1 1))» |
perl6/doc…/operators.pod6 :406: |
which is equivalent to C«1, 2 X~ <a b>». |
perl6/doc…/operators.pod6 :620: |
say %color«cherry "$fruit"».perl; # OUTPUT: «("red", "green")» |
perl6/doc…/operators.pod6 :718: |
X<|postfix ».>X«|postfix >>.» |
perl6/doc…/operators.pod6 :719: |
=head2 postfix C<».> / postfix C«>>.» |
perl6/doc…/operators.pod6 :724: |
my @b = @a».ord; # OUTPUT: «[97, 98, 99]» |
perl6/doc…/operators.pod6 :726: |
say @a».&foo; # So we can pretend to have a method call with a sub that got a good first positional argument. |
perl6/doc…/operators.pod6 :727: |
say @a».&{ .ord}; # Blocks have an implicit positional arguments that lands in $_. The latter can be omitted for method calls. |
perl6/doc…/operators.pod6 :739: |
C<».&foo>), that routine functions as that L<Callable|/type/Callable>. If the L<Callable|/type/Callable> is |
perl6/doc…/operators.pod6 :749: |
@a».say; # WRONG! Could produce abc or cba or any other order |
perl6/doc…/operators.pod6 :1242: |
and C<$b> L«C<Int>|/type/Int». Returns an empty string if C<< $b <= 0 >>. |
perl6/doc…/operators.pod6 :1650: |
Is an alias to C«!==». |
perl6/doc…/quoting.pod6 :216: |
and L<name aliases|/language/unicode#Name_aliases> with L«\c[]|/language/unicode#Entering_unicode_codepoints_and_codepoint_sequences». |
perl6/doc…/quoting.pod6 :352: |
ASCII equivalent to C<« »> are double angle brackets C«<< >>». |
perl6/doc…/quoting.pod6 :355: |
my $a = 42; say « $a b c ».perl; # OUTPUT: «(IntStr.new(42, "42"), "b", "c")» |
perl6/doc…/quoting.pod6 :359: |
my $a = 42; say « "$a b" c ».perl; # OUTPUT: «("42 b", "c")» |
perl6/doc…/rb-nutshell.pod6 :259: |
say %calories« $keys ».join(','); # Perl 6, interpolated split |
perl6/doc…/rb-nutshell.pod6 :725: |
Ruby, unless you change C«->» to C«<->». |
perl6/doc…/rb-nutshell.pod6 :796: |
require you to add the optional C<m> on a plain match like C«/abc/». |
perl6/doc…/rb-nutshell.pod6 :822: |
the assertions will be surrounded by C«<>». |
perl6/doc…/regexes.pod6 :309: |
Its negation is this: C«<:!property>». So, C«<:!Lu>» matches a single |
perl6/doc…/regexes.pod6 :322: |
C«<:Ll+:N>» or C«<:Ll+:Number>» or C«<+ :Lowercase_Letter + :Number>». |
perl6/doc…/regexes.pod6 :782: |
To match any word boundary, use C«<|w>» or C«<?wb>». This is similar to |
perl6/doc…/regexes.pod6 :784: |
character that is not bounding a word, use C«<!|w>» or C«<!wb>». This is similar |
perl6/doc…/regexes.pod6 :1111: |
the match object as a hash, in other words: C<$/{ 'myname' }> or C«$/<myname>». |
perl6/doc…/regexes.pod6 :1281: |
but is otherwise the same as C« $0 < 12 ?? $0 !! $0 - 12 ». When combined with |
perl6/doc…/regexes.pod6 :1400: |
called with C«<named-regex>». At the same time, calling a named regex |
perl6/doc…/regexes.pod6 :1404: |
C«<capture-name=named-regex>». If no capture is desired, a leading dot |
perl6/doc…/regexes.pod6 :1470: |
C«<{$pattern.method}>». |
perl6/doc…/regexes.pod6 :1736: |
it will turn into C«<.ws>». |
perl6/doc…/regexes.pod6 :1740: |
term. So, C<foo +> becomes C«[ foo <.ws> ]+». On the other hand, whitespace |
perl6/doc…/regexes.pod6 :1742: |
becomes C«foo+ <.ws>». |
perl6/doc…/setbagmix.pod6 :381: |
Equivalent to L«(-)». |
perl6/doc…/subscripts.pod6 :767: |
$element = do given $value».split(/',' \s+/).flat { |
perl6/doc…/traps.pod6 :634: |
If you need the number of codepoints, you should use L«C<.codes>|codes». If you need |
perl6/doc…/traps.pod6 :715: |
To avoid this, use C«(Dog) => 42» or C«::Dog => 42». |
perl6/doc…/traps.pod6 :992: |
whitespace follows the initial C«<». |
perl6/doc…/traps.pod6 :1298: |
L«C<Str>|/type/Str#routine_lines». The trap arises if you start |
perl6/doc…/traps.pod6 :1536: |
<a b c d>».say # OUTPUT: «dbca» |
perl6/doc…/traps.pod6 :1543: |
say ((1, 2, 3), [^4], '5')».Numeric; # OUTPUT: «((1 2 3) [0 1 2 3] 5)» |
perl6/doc…/traps.pod6 :1626: |
the program is stopped with L«C<exit>|/routine/exit». |
perl6/doc…/typesystem.pod6 :337: |
say ((1.0, "2", 3e0), [^4], '5')».elems; # OUTPUT: «(3, 4, 1)» |
perl6/doc…/typesystem.pod6 :338: |
say ((1.0, "2", 3e0), [^4], '5')».Int # OUTPUT: «((1 2 3) [0 1 2 3] 5)» |
perl6/doc…/typesystem.pod6 :532: |
X«C«:ver<>»|:ver<> (class)» and X«C«:auth<>»|:auth<> (class)». |
perl6/doc…/typesystem.pod6 :562: |
say @list».to-string; |
perl6/doc…/typesystem.pod6 :682: |
X«C«:ver<>»|:ver<> (role)» and X«C«:auth<>»|:auth<> (role)». |
perl6/doc…/typesystem.pod6 :812: |
Versioning and authorship can be applied via the adverbs C«:ver<>» and C«:auth<>». |
perl6/doc…/typesystem.pod6 :839: |
X«C«:ver<>»|:ver<> (grammar)» and X«C«:auth<>»|:auth<> (grammar)». |
perl6/doc…/unicode_entry.pod6 :261: |
say «$baa $baa ber».perl; # OUTPUT: «("foo", "bar", "foo", "bar", "ber")» |
perl6/doc…/variables.pod6 :573: |
This can be used in conjunction with X«destructuring assignment». Any |
perl6/doc…/variables.pod6 :844: |
~ @c».indent($in).join("\n") |
perl6/doc…/variables.pod6 :851: |
~ @c».indent($in).join("\n") |
perl6/doc…/variables.pod6 :1101: |
These can also be accessed by the shortcut C«$<named>». |
perl6/doc…/variables.pod6 :1197: |
.IO.dir()».&?BLOCK when .IO.d # lets recurse a little! |
perl6/doc…/variables.pod6 :1469: |
On Windows, uses C«%*ENV<HOMEDRIVE> ~ %*ENV<HOMEPATH>». If the home directory |
perl6/doc…/variables.pod6 :1484: |
determined by L«C<.tmpdir IO::Spec::* method>|/routine/tmpdir». |
perl6/doc…/Any.pod6 :99: |
from L«C<.list>|/routine/list». Use L«C<.List>|/routine/List» to |
perl6/doc…/Any.pod6 :222: |
say [[2, 3], [4, [5, 6]]]».nodemap(*+1) |
perl6/doc…/Any.pod6 :251: |
L<hyper method call|/language/operators#index-entry-postfix_».> to call |
perl6/doc…/Any.pod6 :256: |
say [[1, 2, 3], [(4, 5), 6, 7]]».List.flat; # OUTPUT: «(1 2 3 4 5 6 7)» |
perl6/doc…/Any.pod6 :385: |
L<Associative|/type/Associative> role from L«C<.hash>|/routine/hash». Use L«C<.Hash>|/routine/Hash» to |
perl6/doc…/Baggy.pod6 :224: |
an L«C<Associative>|/type/Associative», or an L«C<Iterable>|/type/Iterable». |
perl6/doc…/Baggy.pod6 :267: |
an L«C<Associative>|/type/Associative», or an L«C<Iterable>|/type/Iterable». |
perl6/doc…/Blob.pod6 :81: |
L«C<utf8-c8>|/language/unicode#UTF8-C8». |
perl6/doc…/CallFrame.pod6 :15: |
L«C<$?FILE>|/language/variables#Compile-time_variables» and L«C<$?LINE>|/language/variables#Compile-time_variables». |
perl6/doc…/CallFrame.pod6 :51: |
Return the callable code for the current block. When called on the object returned by C<callframe(0)>, this will be the same value found in L«C<&?BLOCK>|/language/variables#Compile-time_variables». |
perl6/doc…/Callable.pod6 :33: |
This method is required for postfix:«( )» and postfix:«.( )». It's what makes |
perl6/doc…/ComplexStr.pod6 :56: |
Equivalent to L«C<Mu.Capture>|/type/Mu#method_Capture». |
perl6/doc…/ComplexStr.pod6 :72: |
a warning about using an uninitialized value in numeric context and then returns value C«<0+0i>». |
perl6/doc…/DateTime.pod6 :106: |
and defaults to the value of L«C<$*TZ> variable|/language/variables#index-entry-%24*TZ». |
perl6/doc…/DateTime.pod6 :350: |
Converts the invocant to L«C<Date>|/type/Date». |
perl6/doc…/Hash.pod6 :40: |
C<:&as> L«C<Callable>|/type/Callable». The C<@list> cannot be lazy. |
perl6/doc…/Hash.pod6 :43: |
an L«C<Associative>|/type/Associative», or an L«C<Iterable>|/type/Iterable». |
perl6/doc…/Hash.pod6 :66: |
which the C<@list>'s item will be L«C<push>ed|/routine/push». See |
perl6/doc…/Hash.pod6 :122: |
altering the values using the C<:&as> L«C<Callable>|/type/Callable». The |
perl6/doc…/Hash.pod6 :126: |
an L«C<Associative>|/type/Associative», or an L«C<Iterable>|/type/Iterable». |
perl6/doc…/IO.pod6 :78: |
L«C<$path.absolute>|/routine/absolute». B<NOTE:> that in most cases, |
perl6/doc…/IO.pod6 :136: |
successfully change C<$*CWD>, returns L«C<Failure>|/type/Failure». |
perl6/doc…/IO.pod6 :145: |
})».CWD; # OUTPUT: «(/home/camelia)» |
perl6/doc…/IO.pod6 :149: |
})».CWD; # OUTPUT: «(/tmp)» |
perl6/doc…/IO.pod6 :154: |
})».CWD; # OUTPUT: «(/tmp)» |
perl6/doc…/IO.pod6 :185: |
to L<Str|/type/Str> by calling L«C<.Str> method|/routine/Str». L<Junction|/type/Junction> arguments |
perl6/doc…/IO.pod6 :193: |
To print text and include the trailing newline, use L«C<put>|/type/IO#sub_put». |
perl6/doc…/CatHandle.pod6 :48: |
L«C<IO::Handle.encoding>|/type/IO::Handle#method_encoding». Set |
perl6/doc…/CatHandle.pod6 :148: |
Calls L«C<.close>|/type/IO::CatHandle#method_close». |
perl6/doc…/CatHandle.pod6 :299: |
Same as L«C<IO::Handle.lines>|/type/IO::Handle#routine_lines». Note that |
perl6/doc…/CatHandle.pod6 :318: |
Same as L«C<IO::Handle.lock>|/type/IO::Handle#method_lock». Returns L<Nil|/type/Nil> |
perl6/doc…/CatHandle.pod6 :359: |
L«C<.new>|/type/IO::CatHandle#method_new». The return value is the currently |
perl6/doc…/CatHandle.pod6 :716: |
Same as L«C<IO::Handle.unlock>|/type/IO::Handle#method_unlock». Returns L<Nil|/type/Nil> |
perl6/doc…/Handle.pod6 :46: |
L«C<:$enc>|/type/IO::Handle#method_encoding». The values for parameters default |
perl6/doc…/Handle.pod6 :233: |
and whether it is L«C<.opened>|/type/IO::Handle#method_opened». |
perl6/doc…/Handle.pod6 :404: |
L«C<unlock>|/routine/unlock». |
perl6/doc…/Handle.pod6 :618: |
of L«C<.Str>|/routine/Str». |
perl6/doc…/Handle.pod6 :748: |
L«C<IO::Handle.encoding>|/routine/encoding». |
perl6/doc…/Handle.pod6 :889: |
L«C<lines>|/routine/lines». |
perl6/doc…/Handle.pod6 :909: |
and L«C<.say>|/type/IO::Handle#method_say». |
perl6/doc…/Path.pod6 :157: |
Alias for L«C<.add>|/routine/add». B<NOTE:> C<.child> exists largely for |
perl6/doc…/Path.pod6 :175: |
L«C<resolve>|/routine/resolve». |
perl6/doc…/Path.pod6 :335: |
L«C<.path>|/type/IO::Path#attribute_path». Note that no escaping |
perl6/doc…/Path.pod6 :348: |
Alias for L«C<IO::Path.path>|/routine/path». In particular, note that default |
perl6/doc…/Path.pod6 :350: |
L«C<$.CWD> attribute|/type/IO::Path#attribute_CWD». To stringify while |
perl6/doc…/Path.pod6 :754: |
L«C<.add>|/type/IO::Path#method_add». |
perl6/doc…/Path.pod6 :769: |
Opens the invocant and returns its L«words|/type/IO::Handle#routine_words». |
perl6/doc…/Path.pod6 :795: |
Opens the invocant and returns its L«lines|/type/IO::Handle#routine_lines». |
perl6/doc…/Path.pod6 :839: |
in L«C<IO::Handle.open>|/routine/open». Defaults to C<utf8>. Ignored if C<$data> |
perl6/doc…/Path.pod6 :840: |
is a L«C<Blob>|/type/Blob». |
perl6/doc…/Path.pod6 :899: |
To delete non-empty directory, see L«rmtree in C<File::Directory::Tree> module|https://github.com/labster/p6-file-directory-tree». |
perl6/doc…/Path.pod6 :938: |
different storage device. See also: L«C<move>|/routine/move». |
perl6/doc…/Path.pod6 :999: |
To create a hard link, see L«C<link>|/routine/link». |
perl6/doc…/Path.pod6 :1016: |
To create a symbolic link, see L«C<symlink>|/routine/symlink». |
perl6/doc…/Unix.pod6 :80: |
Alias for L«C<catdir>|/routine/catdir». |
perl6/doc…/Win32.pod6 :72: |
Alias for L«C<catdir>|/routine/catdir». |
perl6/doc…/Junction.pod6 :139: |
(gather $j».take).grep(Numeric).say; # OUTPUT: «(42 2.1)» |
perl6/doc…/Junction.pod6 :170: |
$j = any (gather $j».take).grep: {Nil !=== try calc $_}; |
perl6/doc…/List.pod6 :943: |
my @ops = [Z] (<+ - * />, 1..20)».roll(4); |
perl6/doc…/Mix.pod6 :130: |
Coerces the C<Mix> to a L«C<Bag>|/type/Bag». The weights are convert to |
perl6/doc…/Mix.pod6 :141: |
Coerces the C<Mix> to a L«C<BagHash>|/type/BagHash». The weights are |
perl6/doc…/MixHash.pod6 :133: |
Coerces the C<MixHash> to a L«C<Bag>|/type/Bag». The weights are converted |
perl6/doc…/MixHash.pod6 :144: |
Coerces the C<MixHash> to a L«C<BagHash>|/type/BagHash». The weights are converted |
perl6/doc…/Mu.pod6 :243: |
via L«C<nextwith>|/language/functions#sub_nextwith». Alternatively, |
perl6/doc…/Mu.pod6 :305: |
use the default constructor like this: C«Point.new( x => 3, y => 8 )». In this |
perl6/doc…/Pair.pod6 :271: |
L«C<.antipair> method|/type/Pair#method_antipair». |
perl6/doc…/Async.pod6 :422: |
L«C<.Supply>|/type/Proc::Async#method_Supply». It is also an error |
perl6/doc…/RatStr.pod6 :56: |
Equivalent to L«C<Mu.Capture>|/type/Mu#method_Capture». |
perl6/doc…/Routine.pod6 :75: |
say &foo.candidates».multi; # OUTPUT: «(True)» |
perl6/doc…/Str.pod6 :351: |
L«C<Str.Numeric>|/type/Str#method_Numeric». |
perl6/doc…/Str.pod6 :360: |
L«C<Str.Numeric>|/type/Str#method_Numeric». If the denominator is larger |
perl6/doc…/Systemic.pod6 :9: |
L«C<$*KERNEL>|/language/variables#Dynamic_variables». |
perl6/doc…/Test.pod6 :40: |
C<subtest>'s L«C<Callable>|/type/Callable». For that reason, to be able to |
perl6/doc…/htmlify.p6 :505: |
my $rest = $meta[0..*-2]».&textify-guts.join; |
perl6/doc…/htmlify.p6 :535: |
multi textify-guts (List:D \v) { v».&textify-guts.Str } |
perl6/doc…/list-missing-methods.p6 :40: |
my ($type-name, $method-names) = .split('#')[0].split(':')».trim; |
perl6/doc…/list-missing-methods.p6 :58: |
.IO.dir(test => exclude)».&?BLOCK when .IO.d |
perl6/doc…/list-missing-methods.p6 :64: |
my \types := gather for type-pod-files».IO { |
perl6/doc…/list-missing-methods.p6 :79: |
})».name) |
perl6/doc…/list-missing-methods.p6 :83: |
my @found-methods = ($path.slurp ~~ m:g/method \s (<[-'\w]>+) '('/)».[0]; |
perl6/doc…/list-missing-methods.p6 :84: |
my Set $missing-methods = @expected-methods (-) ignore{$type-name} (-) @found-methods».Str; |
perl6/doc…/list-missing-methods.p6 :85: |
# dd @missing-methods, @expected-methods, @found-methods».Str; |
perl6/doc…/aspell.t :46: |
my $tasks = $promises».result; |
perl6/p6-sake…/Task.pm6 :19: |
await @.deps».readify; |
perl6/p6-sake…/IO.pm6 :14: |
await @.deps».readify; |
perl6/p6-sake…/IO.pm6 :18: |
my $last-dep = @.deps».modification-time.max; |
perl6/p6-sake…/TaskStore.pm6 :18: |
~ %TASKS.keys.sort».indent(4).join: “\n” |
perl6/perl6-pod-to-bigpage…/BigPage.pm6 :344: |
$node.contents».&handle().join |
perl6/perl6-pod-to-bigpage…/BigPage.pm6 :467: |
my @name = $node.meta».&escape-markup; |
perl6/whateverable…/Whateverable.pm6 :153: |
|((^32)».chr Z=> (0x2400..*).map(*.chr)), # convert all unreadable ASCII crap |
perl6/whateverable…/long-term-storage.p6 :72: |
my @bytes = @pack.join.comb(2)».parse-base: 16; |
perl6/whateverable…/Quotable.p6 :40: |
my $messages = $CACHE-DIR.dir(test => *.ends-with: ‘.total’)».slurp».trim».Int.sum; |
perl6/whateverable…/Releasable.p6 :112: |
my @shas = $changes.match(:g, / [‘[’ (<.xdigit>**4..*) ‘]’ \s*]+ $$/)»[0].flat».Str; |
perl6/whateverable…/Reportable.p6 :158: |
%data<tags> = ( |$0».Str, |%data<CF.{Tag}>.comb(/\w+/) )».lc.unique; # CF.{Tag} is comma-separated |
perl6/whateverable…/Reportable.p6 :168: |
%data<tags> = %data<labels>»<name>».lc; |
perl6/whateverable…/Statisfiable.p6 :118: |
my @values = @results.reverse».value; |
perl6/whateverable…/Statisfiable.p6 :119: |
my @labels = @results.reverse».key».substr: 0, 8; |
perl6/whateverable…/Unicodable.p6 :56: |
multi method codepointify(Str $char) { $char.ords».fmt(‘U+%04X’).join: ‘, ’ } |
perl6/whateverable…/Unicodable.p6 :85: |
return ‘’ if @all».uniprop(‘Grapheme_Cluster_Break’).any eq |
perl6/whateverable…/Unicodable.p6 :87: |
my $preview = @all».chr.join; |
perl6/whateverable…/Unicodable.p6 :88: |
return ‘’ if @all !~~ $preview.comb».ord; # round trip test |
perl6/whateverable…/Unicodable.p6 :176: |
for $query.comb».ords.flat { |
perl6/whateverable…/Unicodable.p6 :195: |
my @query = @numerics || $query.comb».ords.flat; |
perl6/whateverable…/Unicodable.p6 :209: |
$answer ~= &escape(.comb».ords.flat.map({self.sanify: $_}).join).fmt: ‘ %-25s |’ for @props; |
perlpilot/p6-Test-Class…/Class.pm6 :31: |
%h{%h.keys} = %h.values».sort(*.name); |
perlpilot/p6-Time-Duration-Parser…/Parser.pm6 :10: |
rule timespec { <time> *% <sep> { make [+] $<time>».ast } } |
ppentchev/perl6-Getopt-Std…/Std.pm6 :35: |
make $<option>».made; |
raydiak/Inline-Lua…/Lua.pm6 :17: |
if !$raw && $auto !eqv False && ($lib, $lua)».defined.none { |
raydiak/Inline-Lua…/Raw.pm6 :184: |
Lua::Raw::.grep({ .key ~~ /^ \&luaL?_/ })».value.map: { |
raydiak/Inline-Lua…/lua.p6 :29: |
say "--- Returned\n{ @results».perl.join("\n").indent(4) }"; |
raydiak/Math--ThreeD…/Generator.pm :236: |
qq[method perl () \{ '{$.name}.new(' ~ join(',', self.list».perl) ~ ')' }\n\n]; |
raydiak/Math-Symbolic…/Symbolic.pm6 :53: |
my @vars = $tree.find_all(:type<symbol>)».content.sort.squish; |
raydiak/Math-Symbolic…/Symbolic.pm6 :345: |
$node.content = eval( |@($node.children».content) ); |
raydiak/Math-Symbolic…/Symbolic.pm6 :375: |
my $max_elems = @paths».elems.min; |
raydiak/Math-Symbolic…/Symbolic.pm6 :519: |
self.condense: Any, $_ for $vars.values».grep: Math::Symbolic::Tree; |
raydiak/Math-Symbolic…/Symbolic.pm6 :594: |
unless $vars.keys».keys.all eq $var; |
raydiak/Math-Symbolic…/Symbolic.pm6 :921: |
$str = (@$parse».Str).join: ', ' if $is_array; |
raydiak/Math-Symbolic…/Symbolic.pm6 :989: |
my @keys = $parse<postfix_operator>.list».Str; |
raydiak/Math-Symbolic…/Symbolic.pm6 :1012: |
$str = (@$tree».Str).join: ', ' if $is_array; |
raydiak/Math-Symbolic…/Grammar.pm6 :41: |
my %circ = @circ».parts; |
raydiak/Math-Symbolic…/Grammar.pm6 :96: |
my $in_ops_a = '[' ~ @(%in{@prec[2]}».parts»[0]).map("'" ~ * ~ "'").join('|') ~ ']'; |
raydiak/Math-Symbolic…/Grammar.pm6 :97: |
my $in_ops_b = '[' ~ @(%in{@prec[1]}».parts»[0]).map("'" ~ * ~ "'").join('|') ~ ']'; |
raydiak/Math-Symbolic…/Grammar.pm6 :98: |
my $in_ops_c = '[' ~ @(%in{@prec[0]}».parts»[0]).map("'" ~ * ~ "'").join('|') ~ ']'; |
raydiak/Math-Symbolic…/Grammar.pm6 :117: |
@in_chains.push: rule {<$term>[ (<@(%in{@prec[$_]}».parts»[0])>) <$term>]+}; |
raydiak/Math-Symbolic…/Grammar.pm6 :123: |
my $pre_ops = '[' ~ @(@pre».parts»[0]).map("'" ~ * ~ "'").join('|') ~ ']'; |
raydiak/Math-Symbolic…/Grammar.pm6 :130: |
my $post_ops = '[' ~ @(@post».parts»[0]).map("'" ~ * ~ "'").join('|') ~ ']'; |
raydiak/Math-Symbolic…/Tree.pm6 :49: |
@child_results».unshift: $i if $path; |
raydiak/Math-Symbolic…/Tree.pm6 :77: |
[+] @.children».count, 1 |
raydiak/Math-Symbolic…/Tree.pm6 :156: |
my @args = @.children».Str; |
raydiak/Math-Symbolic…/Tree.pm6 :185: |
return @.children».Str.join: $.content.Str; |
raydiak/Math-Symbolic…/Tree.pm6 :209: |
my @args = @.children».translate: $language; |
raydiak/Math-Symbolic…/Tree.pm6 :213: |
$str = @.children».translate($language).join: $.content.Str; |
raydiak/Math-Symbolic…/Tree.pm6 :237: |
eval(|@(self.children».Numeric)) |
raydiak/Math-Symbolic…/Tree.pm6 :245: |
self.new( :$.type, :$.content, :children(@.children».clone) ); |
raydiak/Math-Symbolic…/01-basics.t :37: |
#.evaluate(:V(2), :P(-3)).expression('t').list».Numeric.sort, |
raydiak/Math-Symbolic…/01-basics.t :38: |
.expression('t').list».compile(<P V>)».(-3, 2).sort, # precomp bug workaround |
retupmoca/P6-Digest-HMAC…/HMAC.pm6 :22: |
return hmac($key, $message, &hash, $blocksize).list».fmt("%02x").join; |
retupmoca/P6-Net-DNS…/Message.pm6 :62: |
|@.question».Buf, |
retupmoca/P6-Net-DNS…/Message.pm6 :63: |
|@.answer».Buf, |
retupmoca/P6-Net-DNS…/Message.pm6 :64: |
|@.authority».Buf, |
retupmoca/P6-Net-DNS…/Message.pm6 :65: |
|@.additional».Buf; |
retupmoca/P6-Net-POP3…/Raw.pm6 :124: |
my $digest = md5(($!timestamp ~ $pass).encode).list».fmt("%02x").join; |
retupmoca/P6-Net-SOCKS…/SOCKS.pm6 :27: |
$request-data = Buf.new($host.split('.')».Int); |
salortiz/p6-LMDB…/02-quick.t :22: |
is-deeply %DB.kv».Str, <A a B b C c D d E e>, 'All in'; |
salortiz/p6-LMDB…/03-custom.t :34: |
is-deeply %DB.kv».Str, <AZ 1 BY 2 CX 3 DW 4 EV 5>, 'The ordered data'; |
salortiz/p6-LMDB…/03-custom.t :47: |
is-deeply %DBR.kv».Str, <EV 5 DW 4 CX 3 BY 2 AZ 1>».Str,'Reversed order data'; |
samcv/perl6-Font-QueryInfo…/QueryAllFonts.p6 :9: |
dir($folder).grep(*.d)».&query-folder; |
samcv/perl6-Font-QueryInfo…/QueryInfo.pm6 :71: |
my @rows = $=pod[0].contents[5].contents.join.lines».split(/\s+/, 3); |
samcv/perl6-Font-QueryInfo…/QueryInfo.pm6 :174: |
?? $value.split(' ').map({my @t = .split('-')».parse-base(16); @t > 1 ?? Range.new(@t[0], @t[1]) !! Range.new(@t[0], @t[0]) }).list |
samcv/perl6-Git-Log…/Log.pm6 :77: |
my $format = '--pretty=format:' ~ @fields».value.join($column-sep) ~ $commit-sep; |
samcv/perl6-Git-Log…/Log.pm6 :90: |
my %thing = %( @fields».key Z=> $entry.split($column-sep) ); |
sergot/http-useragent…/MediaType.pm6 :56: |
parameters => $<parameter>».made()) |
sergot/openssl…/MD5.pm6 :49: |
self.hash.list».fmt("%02x").join; |
sergot/openssl…/05-digest.t :8: |
my $sha1 = [~] .list».fmt: "%02x" given sha1 $test-buf; |
sergot/openssl…/05-digest.t :9: |
my $sha256 = [~] .list».fmt: "%02x" given sha256 $test-buf; |
sergot/openssl…/05-digest.t :10: |
my $sha384 = [~] .list».fmt: "%02x" given sha384 $test-buf; |
sergot/openssl…/05-digest.t :11: |
my $sha512 = [~] .list».fmt: "%02x" given sha512 $test-buf; |
sergot/openssl…/05-digest.t :17: |
is md5('abc'.encode: 'ascii').list».fmt("%02x").join, '900150983cd24fb0d6963f7d28e17f72', "md5"; |
shintakezou/Xmav-JSON…/Actions.pm6 :17: |
method json-string($/) { make $/.caps».value».made .join } |
shintakezou/Xmav-JSON…/Actions.pm6 :18: |
method json-array($/) { make Array.new($/.caps».value».made) } |
shintakezou/Xmav-JSON…/Actions.pm6 :19: |
method json-object($/) { make Hash.new($/.caps».value».made) } |
skids/perl6-Proc-Screen…/Screen.pm6 :279: |
($c».decode('ascii')).join; |
skids/perl6sum…/Sum.pm6 :87: |
$s.partials(1,1,2,1)».Int.say; # (16 17 19 20) |
skids/perl6sum…/Sum.pm6 :92: |
$s.partials(1,'abc',1)».Int.say; # (21 118 216 315 316) |
skids/perl6sum…/siphash.t :18: |
is $s.partials("......")».Int, (0xf3009ba116623fd5, 0xb28753d8b488ae38, 0xfedd16cd7a81b334, 0x17241487941ee6da, 0xdc73124438fcb94d, 0x4c80530e3ead0ad7), "partials yields expected values across a w boundary"; |
skids/perl6sum…/sum.t :134: |
is $h.partials(3,2,1)».Numeric.join(''), "343637", "partials method works"; |
skids/perl6sum…/tiger.t :1699: |
{ $t2.push($_) } for $test.key».encode('ascii'); |
skids/perl6sum…/tiger.t :1702: |
{ $t2u.push($_) } for $test.key».encode('ascii'); |
softmoth/p6-Template-Mustache…/Mustache.pm :50: |
for $<hunk>».made.flat -> $hunk { |
softmoth/p6-Template-Mustache…/Mustache.pm :87: |
for $<linetag tag>.grep(*.defined)».made -> $tag { |
spitsh/spitsh…/gen-docs.p6 :27: |
SDM.generate-dot-md($SETTING.symbols[SCALAR,ARRAY]».values.flat,:$path); |
spitsh/spitsh…/DependencyList.pm6 :76: |
@!deps».gist.join("\n"); |
spitsh/spitsh…/Markdown.pm6 :134: |
flat do for |.pos,|.named.sort».value { |
spitsh/spitsh…/Exceptions.pm6 :201: |
("\nCandidates defined for: {@.candidates».name.join(', ')}." if @.candidates); |
spitsh/spitsh…/Exceptions.pm6 :212: |
("\nCandidates defined for: {@.candidates».name.join(', ')}." if @.candidates); |
spitsh/spitsh…/Exceptions.pm6 :363: |
@.repos».gist.join("\n$pad"); |
spitsh/spitsh…/Compiler.pm6 :598: |
escape .class-type.^types-in-enum».name.join('|') |
spitsh/spitsh…/Composer.pm6 :250: |
patterns => { case => $enum.^types-in-enum».name.join('|') } |
spitsh/spitsh…/Method-Optimizer.pm6 :218: |
when Str { so $b.^types-in-enum».name.first($a) } |
spitsh/spitsh…/Stage2-Util.pm6 :47: |
arg-hints => @non-slurpy[+@pos..*]».spit-gist, |
spitsh/spitsh…/Util.pm6 :47: |
if $*REPO.repo-chain».loaded.flat.first($module) -> $cu { |
stmuk/p6-app-p6tags…/p6tags :66: |
my @files = find( :dir("."), :type('file'), :name( rx/(.p(m|l|6)|pm6 )$/) )».IO.flat.list; |
taboege/p6-SAT…/SAT.pm6 :63: |
my $lits = set((m:g/ '-'? \d+ /)».Int) ∖ 0; |
taboege/p6-SAT…/01-dispatch.t :14: |
take $<var>».Str.map(-> $n { |
tadzik/App-redpanda…/redpanda :72: |
say "{$dist.name} depends on {@deps».name.join(", ")}" |
tadzik/Grammar-BNF…/ABNF.pm :16: |
$g.parse('02-BF-C0-00-02-01')<macaddr><octet>».Str.print; # 02BFC0000201 |
tadzik/Grammar-BNF…/ABNF.pm :306: |
make join(" | ", $/<concatenation>[]».made) |
tadzik/Grammar-BNF…/ABNF.pm :310: |
make join(" ", $/<repetition>[]».made) |
tadzik/Grammar-BNF…/abnf.t :308: |
my $rfc4466g_meths2 = Set($rfc4466.comb(/<after [ ^ | \n ]><-[\s\=]>+/)».lc); |
tadzik/Module-Toolkit…/Toolkit.pm :57: |
my @tests = find(dir => $*CWD.child('t'), name => /\.t$/).list».Str; |
tadzik/Shell-Command…/Command.pm :53: |
for dir($from)».basename -> $item { |
tadzik/Template-Mojo…/Mojo.pm :46: |
my @exprs = $<expression>».ast; |
tadzik/panda…/Command.pm :53: |
for dir($from)».basename -> $item { |
tadzik/panda…/Panda.pm :217: |
self.announce('depends', $bone => @bonedeps».name); |
tadzik/panda…/App.pm :50: |
my $max-name = @projects».name».chars.max; |
tadzik/panda…/App.pm :51: |
my $max-ver = @projects».version».chars.max; |
tadzik/panda…/App.pm :52: |
my $max-rev = @saved.flatmap({ $_<source-revision> // '?'})».chars.max; |
tadzik/perl6-Config-INI…/INI.pm :26: |
my %hash = $<sections>».ast; |
tadzik/perl6-Config-INI…/INI.pm :30: |
method toplevel ($/) { make $<keyval>».ast.hash } |
tadzik/perl6-Config-INI…/INI.pm :31: |
method sections ($/) { make $<header><text>.Str => $<keyval>».ast.hash } |
thundergnat/Acme-Scrub…/Scrub.pm6 :13: |
@socks[$soap[*]».fmt("%08b").join.comb].join, $suds; |
thundergnat/Lingua-EN-Numbers-Cardinal…/Cardinal.pm6 :121: |
my ( $i, $x, $c ) = .comb».Int; |
thundergnat/Lingua-EN-Numbers-Cardinal…/Cardinal.pm6 :144: |
my ($mantissa, $exponent) = $num.fmt("%.14e").split('e')».Numeric; |
thundergnat/Lingua-EN-Numbers-Cardinal…/Cardinal.pm6 :162: |
my ($l, $h) = $year.flip.comb(/\d ** 1..2/).».flip; |
thundergnat/Lingua-EN-Numbers-Cardinal…/00-cardinal.t :7: |
is((join ', ', (1..10)».&cardinal), 'one, two, three, four, five, six, seven, eight, nine, ten', 'Int list'); |
tokuhirom/p6-HTTP-Parser…/Parser.pm6 :82: |
$/.make: $/<field-content>».made.join(""); |
tokuhirom/p6-Protocol-WebSocket…/Cookie.pm6 :19: |
$/.make: $/<pair>».made; |
tokuhirom/p6-Protocol-WebSocket…/Cookie.pm6 :22: |
$/.make: $/.caps».value.join(""); |
tokuhirom/p6-Test-Base…/Actions.pm :8: |
$/.make: $/<block>».made; |
tokuhirom/p6-Test-Base…/Actions.pm :12: |
my %pairs = $/<data>».made; |
tokuhirom/p6-Test-Base…/05-skip.t :20: |
is @blocks».title.join(','), 'hoh,heh'; |
ufobat/p6-time-crontab…/Actions.pm6 :71: |
my ($from, $to) = $p.value{$prefix ~ '-value'}».made; |
ufobat/p6-time-crontab…/Actions.pm6 :75: |
my ($from, $to, $step) = $p.value{$prefix ~ '-value'}».made; |
ufobat/perl6-Temp-Path…/Path.pm6 :32: |
).join.encode('utf8-c8').&sha256».fmt('%02X').join; |
viklund/november…/November.pm :237: |
my $phash = sha256((sha256($user_name.encode).list».fmt("%02x") ~ $password).encode).list».fmt("%02x"); |
viklund/november…/November.pm :250: |
my $hashed = sha256((sha256($user_name.encode).list».fmt("%02x") ~ $password).encode).list».fmt("%02x"); |
zag/plosurin…/Plosurin.pm :81: |
return { self.WHAT.perl =>[ @!childs».dumper]}; |
zag/plosurin…/Plosurin.pm :112: |
method TOP ($/) { make [ $<content>».ast]} |
zag/plosurin…/Plosurin.pm :130: |
my %attr = $/<attribute>».ast.hash; |
zag/plosurin…/t01.t :30: |
is-deeply [ $/.ast».dumper],$check, $test_name ?? $test_name !! $template; |
zag/plosurin…/t02.t :35: |
is-deeply [$/.ast.values».WHAT».perl], ["Template", "Template", "Template"], 'objects'; |
zoffixznet/perl6-IO-MiddleMan…/MiddleMan.pm6 :29: |
@what = @what».gist if $meth eq 'say'; |
zoffixznet/perl6-IRC-Client…/04-bash-bot.p6 :17: |
for $!ua.get($BASH_URL).res.dom.find('.qt').each».all_text.lines.join: ' '; |
zoffixznet/perl6-IRC-Client…/05-bash-bot-with-filter.p6 :18: |
for $!ua.get($BASH_URL).res.dom.find('.qt').each».all_text; |
zoffixznet/perl6-IRC-Client…/Actions.pm6 :10: |
$<message>».made, |
zoffixznet/perl6-IRC-Client…/Server.pm6 :14: |
@!out.append: |.lines».&from-json |
zoffixznet/perl6-Proc-Q…/01-basic.t :19: |
:in[@l».uc], |
zoffixznet/perl6-Reminders…/02-crud.t :13: |
is-deeply $rem.all».Capture, ( |
zoffixznet/perl6-Reminders…/02-crud.t :20: |
is-deeply $rem.all(:all)».Capture, ( |
zoffixznet/perl6-Testo…/Test.pm6 :37: |
$!tester.tests».result».so.all.so |
zoffixznet/q…/Actions.pm6 :9: |
make q:to/♥/ ~ 「<ul class="nodes">」 ~ $<node>».made.join("\n") ~ 「</ul>」; |
zoffixznet/q…/Actions.pm6 :153: |
make $<node>.elems ?? 「<ul class="nodes">」 ~ $<node>».made ~ 「</ul>」 !! '' |
zostay/HTTP-Supply…/Test.pm6 :70: |
for @exp».key -> $exp-key { |
zostay/p6-Path-Router…/Router.pm6 :25: |
for (|@pairs, |%pairs)».kv -> (Str $path, %options) { |
zostay/p6-Path-Router…/Router.pm6 :51: |
for (|@pairs, |%pairs)».kv -> (Str $path, %options) { |
orangebot/p6-Git-Wrapper…/Parser.pm6 :51: |
make [ $<commit>».made ]; |
orangebot/p6-Git-Wrapper…/Parser.pm6 :62: |
make join "\n", @($<indented-line>)».trim; |
Created
July 15, 2019 16:04
-
-
Save Whateverable/d2896cfa8e64dfff922c5b2eebb2d362 to your computer and use it in GitHub Desktop.
greppable6
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
»\. |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment