0racle/p6-Net-Netmask:373: #my ($addr, $mask) = @args.flatmap( *.split(/ \s+ | '/' /) );
0racle/p6-Net-Netmask:394: i.split('.').flatmap({
0racle/p6-Net-Netmask:455: my @n = $n.flatmap(* × $inc);
Mouq/toml-pm6:34: %top{.key} := $%(%top{.key}.flatmap({.pairs}), .value.pairs);
atweiden/mktxn:236: my VarName:D @entities-seen = @entry.flatmap({
atweiden/txn-parser:897: @<segment>».made.flatmap(*.grep(TXN::Parser::AST::Entry:D));
colomon/ABC:101: my $sf = $.context.key-info.key.flatmap({ "{.key}{.value}" }).sort.Str.lc;
colomon/ABC:145: my @chords = $/<chord>.flatmap({ $_.ast });
colomon/ABC:146: my @texts = $/<text_expression>.flatmap({ ~$_ });
colomon/ABC:22: $element-pair.value.flatmap({
colomon/ABC:285: is $match<element>.flatmap(~*), "g>e c g e c e/ f/ g/ e/", "Each element was matched";
colomon/ABC:294: is $match<element>.flatmap(~*), "g>e c g e c e/ f/ g/ e/ ", "Each element was matched";
colomon/ABC:442: is $match<header_field>.flatmap({ .<header_field_name> }), "X T S M L K", "Got the right field names";
colomon/ABC:463: is .<header_field>.flatmap({ .<header_field_name> }), "X T S M L K", "Got the right field names";
colomon/ABC:10: my @titles = @( $match<tune> ).flatmap({ @( .<header><header_field> ).grep({ .<header_field_name> eq "T" })[0] }).flatmap({ .<header_field_data> });
cygx/p6-image-png-inflated:12: my $row = blob8.new(^256 .flatmap: { $_ xx 3, 255 });
dginev/perl6-Lingua-EN-Sentence:25: my Str @ABBREVIATIONS = (@PEOPLE, @ARMY, @INSTITUTES, @COMPANIES, @PLACES, @MONTHS, @MATH, @MISC).flat.flatmap(&lc).sort;
gfldex/perl6-pod-to-bigpage:17810: <p>passes <span class="code">(1, 2)</span> and <span class="code"><a b> </span> in turn to the block, leading to a total of two iterations and th…
gfldex/perl6-pod-to-bigpage:17816: <a name="t99.2.10"></a><h2 id="_type_List.pod6-method_flatmap">99.2.10 method flatmap</h2>
gfldex/perl6-pod-to-bigpage:17818: <pre class="code">method flatmap(List:D: &amp;code) returns Seq:D</pre>
gfldex/perl6-pod-to-bigpage:17820: <pre class="code">LIST.flatmap(CODE)</pre>
gfldex/perl6-pod-to-bigpage:17823: <pre class="code">say ((1, 2), &lt;a b>).flatmap(&amp;uc).join('|'); # 1|2|A|B</pre>
gfldex/perl6-pod-to-bigpage:24980: <a href="#t99.2.10"><li class="toc-level toc-level-2"><span class="toc-number">99.2.10</span> method flatmap</li></a>
grondilu/openssl:31: Buf.new: $A[^$length].flatmap({ splitint(my int $ = $_) });
jonathanstowe/Chronic:215: @values = $top.split(',').flatmap(&explode-item).map(*.Int);
leont/path-iterator:306: ).flatmap: { ($_ => $^pair.key for @($^pair.value)) };
masak/xml-writer:46: [~] @attrs.flatmap({ sprintf ' %s="%s"', .key, $.escape(.value) });
masak/xml-writer:23: (1..20).flatmap: { ; "foobarbaz$_" => [ 'abc' x 5 ] }
moritz/json:41: ~ $d.flatmap(&to-json).join(', ')
moritz/json:46: ~ $d.flatmap({ to-json(.key) ~ ' : ' ~ to-json(.value) }).join(', ')
nkh/P6-Data-Dump-Tree:512: $text.lines.flatmap: { .comb($width) }
perl6-community-modules/uri:7: my %escapes = (^256).flatmap: {
perl6-community-modules/uri:31: @rc = @to_unesc.flatmap: {
perl6-community-modules/uri:35: ?? $0.flatmap({ :16(~$_).chr }).join
perl6-community-modules/uri:36: !! Buf.new($0.flatmap({ :16(~$_) })).decode('UTF-8')
perl6/DBIish:51: make $0.flatmap({.values[0].ast}).join;
perl6/DBIish:150: (0 xx *).flatmap({
perl6/DBIish:158: (0 xx *).flatmap({
perl6/DBIish:25: %h.sort.flatmap({ join '', .key, '=«', .value, '»' }).join('; ');
perl6/doc:508: =head2 method flatmap
perl6/doc:513: method flatmap(--> TODO)
perl6/doc:212: See L<method flatmap|/type/List#method_flatmap> for an alternative that flattens.
perl6/doc:245: =head2 method flatmap
perl6/doc:249: method flatmap(List:D: &code --> Seq:D)
perl6/doc:255: It is considered B<bad practice> to use flatmap. Instead of C<.flatmap( )>,
perl6/doc:257: not confusing like C<.flatmap>.
perl6/doc:261: ## flatmap
perl6/doc:263: say @list.flatmap({.reverse}).perl;
perl6/doc:268: ## .map .flat has the same output as .flatmap
perl6/doc:36: $s.subst(:g, / [ '%' (<.xdigit> ** 2 ) ]+ /, -> $/ { Buf.new($0.flatmap({ :16(~$_) })).decode('UTF-8') })
perl6/doc:342: flatmap
perl6/tap-harness6:8: return $path.dir(:test(rx/\.t$/)).flatmap(&listall);
perl6/tap-harness6:45: my @sources = @files.map(*.IO).flatmap(&listall);
ppentchev/perl6-Getopt-Std:50: $t.optstring.comb(/ . ':'? /).flatmap(-> $opt {
raydiak/pray:34: my @filters = @obstructions.flatmap: {
sergot/http-useragent:20: $s ~= ';' ~ (%.fields.flatmap( *.fmt("%s=%s") )).join('; ') if %.fields.elems > 1;
sergot/http-useragent:48: self.set-cookie($_) for $response.field('Set-Cookie').grep({ $_.defined }).flatmap({ "Set-Cookie: $_" });
sergot/http-useragent:58: my $cookiestr = "{$cookie.name}={$cookie.value}; {($cookie.fields.flatmap( *.fmt("%s=%s") )).join('; ')}";
sergot/http-useragent:119: @.cookies.flatmap({ "Set-Cookie: {$_.Str}" }).join("\n");
sergot/http-useragent:113: @.fields.flatmap({ "{$_.name}: {self.field($_.name)}$eol" }).join;
spitsh/spitsh:740: @!os-candidates .= flatmap: -> $os,$block { cont-pair $os,$block };
stmuk/tap-harness6-prove6:8: return $path.dir(:test(rx/\.t$/)).flatmap(&listall);
stmuk/tap-harness6-prove6:44: my @sources = @files.map(*.IO).flatmap(&listall);
tadzik/panda:49: my @saved = @projects.flatmap({ $es.project-get-saved-meta($_) || {} });
tadzik/panda:52: my $max-rev = @saved.flatmap({ $_<source-revision> // '?'})».chars.max;
ugexe/zef:330: my @source_files = $meta<provides>.values.flatmap(*.values.map(*.<file>));
ugexe/zef:341: $identity ~~ any($candi.dist.compat.meta<provides>.values.flatmap(*.values.map(*.<file>)))
ugexe/zef:656: for |@args.flatmap(*.split(/\=/, 2)).rotor(2 => -1, :partial) {
ugexe/zef:616: if @installed-candidates.map(*.dist).flatmap(*.scripts.keys).unique -> @bins {
ugexe/zef:752: .map(*.dist.metainfo<includes>).flatmap(*.flat);
ugexe/zef:765: @ = @linked.map(*.dist.metainfo<includes>).flatmap(*.flat).unique;
ugexe/zef:65: @.depends = @.depends.flatmap(*.flat);
ugexe/zef:66: @!test-depends = @!test-depends.flatmap(*.flat);
ugexe/zef:67: @!build-depends = @!build-depends.flatmap(*.flat);
ugexe/zef:68: @!resources = @!resources.flatmap(*.flat);
zostay/Template-Anti:258: %attribs.sort».kv.flatmap: -> ($k, $v) {
zostay/p6-Getopt-ForClass:7: my %named-params = $sig.params.grep(*.named).flatmap(-> $p {
zostay/p6-HTTP-Headers:410: method flatmap(&code) {
zostay/p6-HTTP-Headers:411: self.sorted-headers.flatmap: &code;
zostay/p6-HTTP-Headers:418: my $string = join $eol, self.flatmap: -> $header {
zostay/p6-HTTP-Headers:436: self.flatmap: -> $h {
zostay/perl6-ArrayHash:664: @!array.kv.flatmap({ .defined && Pair ?? .kv !! $_ })
zostay/perl6-IO-Glob:406: [&&] (@parts Z @!globbers).flatmap: -> ($p, $g) { $p ~~ $g };
Created
July 29, 2017 17:35
Star
You must be signed in to star a gist
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
| flatmap |
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment