Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created June 22, 2019 19:46
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save Whateverable/9293e27affd6d158e897650fa9584b02 to your computer and use it in GitHub Desktop.
Save Whateverable/9293e27affd6d158e897650fa9584b02 to your computer and use it in GitHub Desktop.
greppable6
\.first;
File Code
CONO/Algorithm-Heap-Binary
…/Binary.pm6 :127:
return @!data.first;
CONO/Algorithm-Heap-Binary
…/Binary.pm6 :140:
my $result = @!data.first;
CONO/Algorithm-Heap-Binary
…/Binary.pm6 :155:
my $result = @!data.first;
JMASLAK/Net-BGP
…/Controller.pm6 :63:
@capabilities.grep( { $^c ~~ Net::BGP::Capability::ASN32 } ).first;
JMASLAK/Net-BGP
…/Controller.pm6 :113:
@capabilities.grep( { $^c ~~ Net::BGP::Capability::ASN32 } ).first;
JNTHN/Cro-HTTP
…/GeneralParser.pm6 :46:
my $pair = $_.first;
JNTHN/Cro-HTTP
…/GeneralParser.pm6 :50:
my $pair = $_.first;
JNTHN/OpenAPI-Model
…/00-openapi-model.t :114:
my $pair = $api.paths.pairs.first;
JNTHN/cro
…/LinkTemplate.pm6 :43:
my $endpoint = $cro-file.endpoints.grep(*.id eq $endp).first;
JSTOWE/Audio-Playlist-JSPF
…/README.md :22:
my $track-uri = $track.location.first;
JSTOWE/Lumberjack-Application
…/JSON.pm :128:
my $when = self.^attributes.grep({$_.name eq '$!when'}).first;
JSTOWE/Lumberjack-Application
…/JSON.pm :131:
my $class = self.^attributes.grep({$_.name eq '$!class'}).first;
JSTOWE/Lumberjack-Application
…/JSON.pm :134:
my $level = self.^attributes.grep({ $_.name eq '$!level' }).first;
JSTOWE/Oyatul
…/Oyatul.pm :676:
self.nodes-for-purpose($purpose).grep(*.is-template).first;
JSTOWE/XML-Class
…/Class.pm :1075:
my $element = self.elements(TAG => $name, :SINGLE) || self.elements.map(&check-role).grep({ $_.local-name eq $name && $_.namespace eq $ns}).first;
SKAJI/App-Mi6
…/Mi6.pm6 :31:
my $pair = @($config).grep({ $_.key eq $key }).first;
SKAJI/App-Mi6
…/BumpVersion.pm6 :75:
@!line.map(*<version>).sort({ Version.new($^b) <=> Version.new($^a) }).first;
VRURG/IP-Addr
…/030-ipv4-addr.t :33:
my $ip2 = $ip.first;
VRURG/IP-Addr
…/031-ipv6-addr.t :27:
my $ip2 = $ip.first;
YNOTO/DB-Xoos
…/README.md :46:
my $xyz = $customer-model.search({ name => { 'like' => '%xyz%' } }).first;
YNOTO/DB-Xoos
…/README.md :69:
my $xyz = $customer-model.search({ name => { 'like' => '%xyz%' } }).first;
YNOTO/DB-Xoos
…/README.md :129:
}).first; #only the .id field in the customer row is fetched/filled
Altai-man/ASN-META
…/META.pm6 :64:
my $def = $*TYPES.grep(*.name eq $name).first;
FCO/Math-PascalTriangle
…/PascalTriangle.pm6 :14:
my \min = %LRU.sort(*.value)>>.key.first;
FCO/ProblemSolver
…/README.md :182:
my %res = $problem.solve.first;
FCO/ProblemSolver
…/colorize-map.p6 :68:
my %res = $problem.solve.first;
FCO/ProblemSolver
…/State.pm6 :81:
%!vars{$var} = $new.keys.first;
FCO/ProblemSolver
…/send-more-money.p6 :37:
my %resp = $problem.solve.first;
LLFourn/p6-OO-Schema
…/Schema.pm6 :38:
my $res = self.^children.map(*.resolve($test)).first;
adaptiveoptics/HTML-Tag
…/Form.pm6 :16:
my $name = $element.keys.first;
adaptiveoptics/P6-Finance-GDAX-API
…/Account.pm6 :11:
return self.send.first;
ahalbert/perl6-itertools
…/itertools.pm :127:
my $accumulator = @iterable.first;
azawawi/farabi6
…/codemirror.js :181:
d.viewFrom = d.viewTo = doc.first;
azawawi/farabi6
…/codemirror.js :182:
d.reportedViewFrom = d.reportedViewTo = doc.first;
azawawi/farabi6
…/codemirror.js :242:
cm.doc.frontier = cm.doc.first;
azawawi/farabi6
…/codemirror.js :2336:
if (doc.frontier < doc.first) doc.frontier = doc.first;
azawawi/farabi6
…/codemirror.js :2380:
if (search <= doc.first) return doc.first;
azawawi/farabi6
…/codemirror.js :3133:
if (from == null) from = cm.doc.first;
azawawi/farabi6
…/codemirror.js :3212:
cm.display.viewFrom = cm.display.viewTo = cm.doc.first;
azawawi/farabi6
…/codemirror.js :4878:
if (line < this.doc.first) line = this.doc.first;
azawawi/farabi6
…/codemirror.js :4898:
var cm = this, doc = cm.doc, i = doc.first;
azawawi/farabi6
…/codemirror.js :7223:
firstLine: function() {return this.first;},
azawawi/farabi6
…/codemirror.js :7420:
var ch, lineNo = this.first;
azawawi/farabi6
…/codemirror.js :7531:
n -= doc.first;
azawawi/farabi6
…/codemirror.js :7581:
return no + cur.first;
azawawi/farabi6
…/codemirror.js :7587:
var n = chunk.first;
azawawi/perl6-gtk-scintilla
…/catch.hpp :4702:
countIt = tagCounts.insert( std::make_pair( lcaseTagName, TagInfo() ) ).first;
gabrielash/p6-log-zmq
…/Logger.pm :83:
$!suppress-level = %h.keys.first;
gfldex/perl6-meta6-bin
…/bin.pm6 :270:
$title //= git-log(:$base-dir).first;
jonathanstowe/Lumberjack-Application
…/JSON.pm :128:
my $when = self.^attributes.grep({$_.name eq '$!when'}).first;
jonathanstowe/Lumberjack-Application
…/JSON.pm :131:
my $class = self.^attributes.grep({$_.name eq '$!class'}).first;
jonathanstowe/Lumberjack-Application
…/JSON.pm :134:
my $level = self.^attributes.grep({ $_.name eq '$!level' }).first;
jonathanstowe/Oyatul
…/Oyatul.pm :676:
self.nodes-for-purpose($purpose).grep(*.is-template).first;
jonathanstowe/XML-Class
…/Class.pm :1067:
my $element = self.elements(TAG => $name, :SINGLE) || self.elements.map(&check-role).grep({ $_.local-name eq $name && $_.namespace eq $ns}).first;
kalkin/Ddt
…/Distribution.pm6 :52:
return @candidates.grep(:f & :!l).first;
kalkin/Ddt
…/Hack.pm6 :57:
my $candi = @local.first;
madcapjake/p6-myhtml
…/Raw.pm6 :61:
has TagIndexNode $.first;
madcapjake/rabble
…/Shufflers.pm6 :13:
$ctx.stack ↞ @stash.first;
matiaslina/perl6-matrix-client
…/basics.pod6 :81:
my $room = $client.joined-rooms.first;
nige123/app.123.do
…/Timeline.pm :138:
return self.entries.values.map(*.Slip).grep(*.id == $entry-id).first;
noqisofon/p6-miroku
…/Miroku.pm6 :147:
my $meta-file = <META6.json META.info>.grep( { .IO ~~ :f & :!l } ).first;
noqisofon/p6-miroku
…/Miroku.pm6 :364:
my $first-module-file = @module-files.first;
perl6/doc
…/Any.pod6 :694:
say Any.first; # OUTPUT: «(Any)␤»
perl6/doc
…/Pair.pod6 :243:
say $p.first; # OUTPUT: «Perl => 6␤»
pierre-vigier/Perl6-Acme-Sudoku
…/Sudoku.pm6 :188:
@!cells[$r;$c].solved = @!cells[$r;$c].candidates.first;
supernovus/perl6-xml-query
…/basic.t :55:
my $first-tag = $by-tag.first;
tony-o/perl6-xoo
…/README.md :44:
my $xyz = $customer-model.search({ name => { 'like' => '%xyz%' } }).first;
tony-o/perl6-xoo
…/README.md :129:
}).first; #only the .id field in the customer row is fetched/filled
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment