Skip to content

Instantly share code, notes, and snippets.

@Whateverable
Created April 13, 2020 10:51
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/0851b5a011e5500c926872236453f3a4 to your computer and use it in GitHub Desktop.
Save Whateverable/0851b5a011e5500c926872236453f3a4 to your computer and use it in GitHub Desktop.
greppable6
File Code
AZAWAWI/SDL2
…/shooter.p6 :306:
@enemies .= grep({ $_.pos.im < H + 30 && (!$_.lifetime || $_.lifetime > 0) });
COKE/App-Uni
…/Uni.pm :36:
hyper for @strings -> $criteria { $sieve .= grep({uniname($_).fc.contains($criteria)}) };
COKE/App-Uni
…/Uni.pm :37:
hyper for @regexes -> $criteria { $sieve .= grep({uniname($_).fc ~~ $criteria}) };
CTILMES/GraphQL
…/GraphQL.pm :113:
$type.fieldlist .= map({ self.resolve-type($_) });
CTILMES/GraphQL
…/GraphQL.pm :117:
$type.fieldlist .= map({ self.resolve-type($_) });
CTILMES/GraphQL
…/GraphQL.pm :119:
$type.interfaces .= map({ self.resolve-type($_) });
CTILMES/GraphQL
…/GraphQL.pm :136:
$type.inputFields .= map({ self.resolve-type($_) });
CTILMES/GraphQL
…/GraphQL.pm :140:
$type.possibleTypes .= map({ self.resolve-type($_) });;
CTILMES/GraphQL
…/GraphQL.pm :149:
$type.args .= map({ self.resolve-type($_) });
CTILMES/LibGit2
…/Repository.pm6 :673:
$parents-array .= new($.commit-lookup($.name-to-id('HEAD')));
ELIZABETH/Env
…/README.md :29:
$PATH .= ":.";
ELIZABETH/Env
…/README.md :42:
$PATH .= ":.";
ELIZABETH/Env
…/Env.pm6 :118:
$PATH .= ":.";
ELIZABETH/Env
…/Env.pm6 :132:
$PATH .= ":.";
ELIZABETH/List-MoreUtils
…/MoreUtils.pm6 :335:
@values .= sort( &code ).List
FRITH/Desktop-Notify-Progress
…/01-basic.t :21:
{ my IO::Handle $fh .= new; my $fp := Desktop::Notify::Progress.new: :$fh, :title('nonexistent') },
FRITH/Image-Libexif
…/01-raw.t :65:
my Buf $buf .= allocate: $entry.components, 0;
FRITH/Image-Libexif
…/02-oo.t :18:
$e2 .= new: :file('t/sample01.jpg');
FRITH/Math-FFT-Libfftw3
…/README.md :36:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/2Dtransform.p6 :7:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/C2C.pm6 :188:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/R2C.pm6 :207:
my Math::FFT::Libfftw3::R2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/R2R.pm6 :192:
my Math::FFT::Libfftw3::R2R $fft .= new: data => 1..18, dims => (6, 3), kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :16:
my Math::FFT::Libfftw3::C2C $fft1 .= new: data => 1..6;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :57:
my Math::FFT::Libfftw3::C2C $fft2 .= new: data => 1..6, flag => FFTW_MEASURE;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :74:
my Math::FFT::Libfftw3::C2C $fft .= new: data => (1..6).list;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :83:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1/1..6/1;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :100:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1e0..6e0;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :108:
my Math::FFT::Libfftw3::C2C $fft .= new: data => (1e0..6e0).list;
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 :143:
my Math::FFT::Libfftw3::C2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :299:
my Math::FFT::Libfftw3::C2C $fft1 .= new: data => 1..6, flag => FFTW_MEASURE;
FRITH/Math-FFT-Libfftw3
…/05-c2c.t :309:
my Math::FFT::Libfftw3::C2C $fft2 .= new: data => 1..6;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :16:
my Math::FFT::Libfftw3::R2C $fft1 .= new: data => 1..6;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :46:
my Math::FFT::Libfftw3::R2C $fft2 .= new: data => 1..6, flag => FFTW_MEASURE;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :61:
my Math::FFT::Libfftw3::R2C $fft .= new: data => (1..6).list;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :70:
my Math::FFT::Libfftw3::R2C $fft .= new: data => 1/1..6/1;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :87:
my Math::FFT::Libfftw3::R2C $fft .= new: data => 1e0..6e0;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :95:
my Math::FFT::Libfftw3::R2C $fft .= new: data => (1e0..6e0).list;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :117:
my Math::FFT::Libfftw3::R2C $fft .= new: data => 1..18, dims => (6, 3);
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :247:
my Math::FFT::Libfftw3::R2C $fft1 .= new: data => 1..6, flag => FFTW_MEASURE;
FRITH/Math-FFT-Libfftw3
…/06-r2c.t :257:
my Math::FFT::Libfftw3::R2C $fft2 .= new: data => 1..6;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :26:
my Math::FFT::Libfftw3::R2R $fft .= new: data => 1..6, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :40:
my Math::FFT::Libfftw3::R2R $fft2 .= new: data => 1..6, flag => FFTW_MEASURE, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :52:
my Math::FFT::Libfftw3::R2R $fft .= new: data => (1..6).list, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :61:
my Math::FFT::Libfftw3::R2R $fft .= new: data => 1/1..6/1, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :78:
my Math::FFT::Libfftw3::R2R $fft .= new: data => 1e0..6e0, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :86:
my Math::FFT::Libfftw3::R2R $fft .= new: data => (1e0..6e0).list, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :108:
my Math::FFT::Libfftw3::R2R $fft .= new: data => 1..18, dims => (6, 3), kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :208:
my Math::FFT::Libfftw3::R2R $fft1 .= new: data => 1..6, flag => FFTW_MEASURE, kind => FFTW_R2HC;
FRITH/Math-FFT-Libfftw3
…/07-r2r.t :218:
my Math::FFT::Libfftw3::R2R $fft2 .= new: data => 1..6, kind => FFTW_R2HC;
HANENKAMP/DOM-Tiny
…/CSS.pm6 :148:
@siblings .= grep({ .tag eq $current.tag }) if $!of-type;
HANENKAMP/DOM-Tiny
…/CSS.pm6 :180:
@siblings .= grep({ .tag eq $current.tag }) if $!of-type;
HANENKAMP/DOM-Tiny
…/HTML.pm6 :181:
$siblings.=grep({ $_ !=== self }).=cache unless $including-self;
HANENKAMP/DOM-Tiny
…/HTML.pm6 :193:
%result<before> .= grep(Tag) .= cache;
HANENKAMP/DOM-Tiny
…/HTML.pm6 :194:
%result<after> .= grep(Tag) .= cache;
HANENKAMP/HTTP-Request-Supply
…/Body.pm6 :81:
$str-size .= subst(/';' .*/, '');
HANENKAMP/HTTP-Supply
…/Body.pm6 :81:
$str-size .= subst(/';' .*/, '');
HANENKAMP/ModelDB
…/Collection.pm6 :15:
my ModelDB::Table[MyApp::Animals] $table .= new(...);
HANENKAMP/ModelDB
…/Table.pm6 :26:
my ModelDB::Schema $schema .= new(...);
HANENKAMP/Smack
…/Directory.pm6 :80:
$url.=split('/').=map(&uri-escape).=join('/');
HANENKAMP/Smack
…/URLMap.pm6 :55:
@!mapping .= sort({ (.[0] ~~ Str ?? .[0].chars !! 0), .[1].chars })
HANENKAMP/Smack
…/URLMap.pm6 :59:
.= map({ (.[0], .[1], .[2].returns ~~ Callable ?? .[2].(%config) !! .[2]) });
HANENKAMP/Smack
…/URLMap.pm6 :80:
$path .= substr($location.chars);
HANENKAMP/Smack
…/Smackup.pm6 :29:
.=subst(/'{' (<[ a .. z ]>+) '}'/, { %vars{$0} }, :g) for @!cmd;
HANENKAMP/Smack
…/URI.pm6 :177:
@!query-form .= grep({ .key ne $k });
HANENKAMP/Smack
…/URI.pm6 :193:
my @ps = @!query-form .= grep({ .key ne $k });
HANENKAMP/Smack
…/Util.pm6 :64:
@h .= grep(*.key ne $remove)
HMBRAND/Text-CSV
…/CSV.pod6 :1617:
my CSV::Row $row .= new(csv => $csv, fields => @f.map({ CSV::Field.new(*) });
HYTHM/Grid
…/Grid.pm :398:
@indices .= sort.unique;
JGOFF/Perl6-Parser
…/rosetta-1.t :19:
(.=not for @doors[0, $_ ... 100]) for 1..100;
JGOFF/Pod-To-HTMLBody
…/01-tree.t :1192:
# Without the =begin..=end directives here, each =for is its own directive.
JNTHN/Cro-HTTP
…/BodyParsers.pm6 :76:
$name .= subst(:g, /'%' (<[A..Fa..f0..9]>**2)/, {
JNTHN/Cro-HTTP
…/BodyParsers.pm6 :86:
$value .= subst(:g, /'%' (<[A..Fa..f0..9]>**2)/, {
JNTHN/Cro-HTTP
…/BodyParsers.pm6 :146:
$payload .= substr($start + $dd-boundary.chars);
JNTHN/Cro-HTTP
…/BodyParsers.pm6 :167:
$payload .= substr($next-boundary + $search.chars);
JNTHN/Cro-HTTP
…/CookieJar.pm6 :129:
@!cookies .= grep({ not $condition($_.cookie) });
JNTHN/Cro-HTTP
…/CookieJar.pm6 :135:
@!cookies .= grep({ not $condition($_.cookie) });
JNTHN/Cro-HTTP
…/Message.pm6 :32:
@!headers .= grep({ not .name.fc eq $folded && ++$removed });
JNTHN/Cro-HTTP
…/Router.pm6 :452:
my Str $coerce-prefix = $type =:= Int ?? '.=Int' !! '.=UInt';
JNTHN/OpenAPI-Model
…/Element.pm6 :95:
$t .= substr(1) if $t.starts-with('-');
JNTHN/OpenAPI-Model
…/Element.pm6 :208:
$keys .= grep({ not .key.starts-with('x-') });
JNTHN/POFile
…/POFile.pm6 :269:
@!items .= grep({ not $_.msgid eq $key }); # order is preserved
JNTHN/cro
…/CLI.pm6 :27:
%options .= grep({ not .key eq 'link' });
JNTHN/cro
…/Runner.pm6 :118:
$wait .= map(*.value);
KAIEPI/Net-LibIDN
…/StringPrep.pm6 :134:
my Blob[uint32] $output .= new: ($outputptr[$_] for 0..^$written);
KAIEPI/Net-LibIDN
…/StringPrep.pm6 :153:
my Blob[uint8] $output .= new: ($outputptr[$_] for 0..^$written);
KUERBIS/Term-Choose
…/LineFold.pm6 :69:
$_.=subst( / \t /, ' ', :g ).=subst( / \v+ /, ' ', :g ).=subst( / <:Cc+:Noncharacter_Code_Point+:Cs> /, '', :g ),
MARTIMM/Auth-SCRAM
…/SCRAM.pod6 :112:
my Buf $mangled-password .= new($password.encode);
MARTIMM/Auth-SCRAM
…/201-SCRAM.t :19:
has Buf $!salt .= new((for ^6 { (rand * 256).Int }));
MARTIMM/BSON
…/README.md :35:
my BSON::Binary $bin .= new(:data(Buf,new(... some binary data ...));
MARTIMM/BSON
…/BSON.pm6 :74:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/BSON.pm6 :260:
$ble .= new($b.subbuf( $index, 8));
MARTIMM/BSON
…/BSON.pm6 :264:
$ble .= new($b.subbuf( $index, 8).reverse);
MARTIMM/BSON
…/Document.pod6 :175:
$d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/ObjectId.pm6 :37:
$!oid .= new: ($string.comb(/../) ==> map { :16($_) });
MARTIMM/BSON
…/110-objectid.t :23:
{ my BSON::ObjectId $o .= new(:bytes(Buf.new(5,7,9...15))); },
MARTIMM/BSON
…/120-javascript.t :58:
my BSON::Document $d1 .= new: ( :jsc1($js-scope), :jsc2($js-scope.clone));
MARTIMM/BSON
…/300-document.t :24:
my BSON::Document $d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/300-document.t :109:
my BSON::Document $d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/310-document.t :8:
my BSON::Document $d .= new: ('a' ... 'd') Z=> 121..124;
MARTIMM/BSON
…/320-document.t :20:
my BSON::Binary $bin .= new( :data($uuid.Blob), :type(BSON::C-UUID) );
MARTIMM/BSON
…/320-document.t :24:
my DateTime $datetime .= new( DateTime.now.posix, :timezone($*TZ));
MARTIMM/BSON
…/int.pl6 :35:
$ble .= new($b.subbuf( $index, 4));
MARTIMM/BSON
…/int.pl6 :39:
$ble .= new($b.subbuf( $index, 4).reverse);
MARTIMM/BSON
…/int.pl6 :53:
$ble .= new($b.subbuf( $index, 8));
MARTIMM/BSON
…/int.pl6 :57:
$ble .= new($b.subbuf( $index, 8).reverse);
MARTIMM/BSON
…/Document1.pm6 :427:
my BSON::Document $d .= new: ('0' ...^ $p.value.elems.Str) Z=> $p.value;
MARTIMM/BSON
…/Document1.pm6 :641:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/Document2.pm6 :427:
my BSON::Document $d .= new: ('0' ...^ $p.value.elems.Str) Z=> $p.value;
MARTIMM/BSON
…/Document2.pm6 :641:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/Document3.pm6 :613:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/GTK-Glade
…/Engine.pm6 :20:
$!text-buffer .= new(:widget($!text-view.get-buffer));
MARTIMM/GTK-Glade
…/Engine.pm6 :34:
$!text-buffer .= new(:widget($!text-view.get-buffer));
MARTIMM/GTK-Glade
…/Engine.pm6 :42:
$!text-buffer .= new(:widget($!text-view.get-buffer));
MARTIMM/GTK-Glade
…/Engine.pm6 :58:
$!text-buffer .= new(:widget($!text-view.get-buffer));
MARTIMM/GTK-V3
…/GObject.pm6 :316:
my GTK::V3::Glib::GSList $rb-list .= new(:gslist($rb2.get-group));
MARTIMM/GTK-V3
…/GObject.pm6 :340:
my GTK::V3::Gtk::GtkBuilder $builder .= new(:filename<my-gui.glade>);
MARTIMM/GTK-V3
…/GtkBuilder.pm6 :136:
my GTK::V3::Gtk::GtkBuilder $builder .= new(:filename<my-ui.glade>);
MARTIMM/GTK-V3
…/GtkWidget.pm6 :320:
my Gtk::V3::Gdk::GdkWindow $w .= new(:widget($b.get-window));
MARTIMM/GTK-V3
…/101-screen.t :30:
my GTK::V3::Gdk::GdkDisplay $display .= new(:widget($screen.get-display));
MARTIMM/GTK-V3
…/301-button.t :57:
my GTK::V3::Glib::GList $gl .= new(:glist($button1.get-children));
MARTIMM/GTK-V3
…/303-radiobutton.t :43:
my GTK::V3::Glib::GSList $l .= new(:gslist($rb2.get-group));
MARTIMM/GTK-V3
…/303-radiobutton.t :47:
my GTK::V3::Gtk::GtkRadioButton $b .= new(:widget($l.nth-data-gobject(1)));
MARTIMM/GTK-V3
…/303-radiobutton.t :49:
$b .= new(:widget($l.nth-data-gobject(0)));
MARTIMM/GTK-V3
…/330-grid.t :28:
my GTK::V3::Glib::GList $gl .= new(:glist($grid.get-children));
MARTIMM/GTK-V3
…/340-listbox.t :32:
my GTK::V3::Glib::GList $gl .= new(:glist($list-box.get-children));
MARTIMM/GTK-V3
…/340-listbox.t :37:
my GTK::V3::Gtk::GtkGrid $lb-grid .= new(:widget($lb-row.get_child()));
MARTIMM/GTK-V3
…/340-listbox.t :38:
$gl .= new(:glist($lb-grid.get-children));
MARTIMM/MongoDB
…/sock.pl6 :6:
#$sock .= new( :host<192.168.0.2>, :port(65010));
MARTIMM/MongoDB
…/sock.pl6 :7:
#$sock .= new( :host<127.0.0.1>, :port(65010));
MARTIMM/MongoDB
…/sock.pl6 :12:
#$sock .= new( :host<localhost.localdomain>, :port(65010));
MARTIMM/MongoDB
…/table-role.pm6 :61:
$!record .= new unless $!record.defined;
MARTIMM/MongoDB
…/Client.pm6 :53:
# In case of an assignement like $c .= new(...) $c should be cleaned first
MARTIMM/MongoDB
…/Client.pod6 :45:
my MongoDB::Client $c .= new( ... );
MARTIMM/MongoDB
…/Client.pod6 :57:
$c1 .= new(...);
MARTIMM/MongoDB
…/Client.pod6 :63:
$c2 .= new(...);
MARTIMM/MongoDB
…/Collection.pm6 :86:
my BSON::Document $req .= new: ( :count($!cl.name), :$query);
MARTIMM/MongoDB
…/Header.pm6 :309:
my BSON::Document $document .= new($b.subbuf( $index, $doc-size));
MARTIMM/MongoDB
…/Socket.pm6 :28:
$!sock .= new( :host($!server.server-name), :port($!server.server-port));
MARTIMM/MongoDB
…/Wire.pm6 :19:
has Duration $!round-trip-time .= new(0.0);
MARTIMM/MongoDB
…/300-Collection.t :56:
$req .= new: ( count => $collection.name, query => (name => 'Me T',));
MARTIMM/MongoDB
…/300-Collection.t :83:
$req .= new: ( :count($collection.name), :query((:test(0),)));
MARTIMM/MongoDB
…/300-Collection.t :87:
$req .= new: ( :count($collection.name), :query((:name('Di D'),)));
MARTIMM/MongoDB
…/300-Collection.t :96:
$req .= new: (drop => $collection.name);
MARTIMM/MongoDB
…/450-find.t :102:
$req .= new: ( count => $collection.name);
MARTIMM/MongoDB
…/110-Client.t :35:
$client .= new(:uri("mongodb://$server-name/?" ~ @options.join('&')));
MARTIMM/MongoDB
…/110-Client.t :46:
$client .= new(:uri("mongodb://$server-name/?" ~ @options.join('&')));
MARTIMM/MongoDB
…/110-Client.t :61:
$client .= new(:uri("mongodb://$server-name/?" ~ ~ @options.join('&')));
MARTIMM/MongoDB
…/110-Client.t :83:
$client .= new(:uri("mongodb://$server-name/?" ~ ~ @options.join('&')));
MARTIMM/XML-Actions
…/100-Actions.t :66:
{ $a .= new(); $a.process(:actions(A.new())); },
MLDEVINE/KHPH
…/README.md :89:
my KHPH $passwd .= new(:stash-path(%*ENV<HOME> ~ '/.myapp/password.khph')).expose.print;
MORITZ/JSON-Tiny
…/01-parse.t :201:
$desc .= subst(/\n.*$/, "\\n...[$i]");
MORITZ/JSON-Tiny
…/01-parse.t :215:
$desc .= subst(/\n.*$/, "\\n...[$i]");
MOZNION/Log-Minimal
…/Minimal.pm6 :117:
# $messages.=subst(/<[\r\n\t]>/, { sprintf('\\x%02x', $_.ord) }, :g)
SAMGWISE/Reaper-Control
…/Control.pm6 :128:
$_ .= new unless .defined
SAMGWISE/Reaper-Control
…/Control.pm6 :223:
$mixer .= new unless $mixer.defined;
SAMGWISE/Reaper-Control
…/Control.pm6 :240:
$mixer.tracks[$index] .= new if !$mixer.tracks or $mixer.tracks.end < $index or !$mixer.tracks[$index].defined;
SAMGWISE/Reaper-Control
…/Control.pm6 :259:
$unhandled .= new unless $unhandled.defined;
SAMGWISE/ScaleVec
…/step-to-freq.p6 :9:
my ScaleVec $triad-rat .= new: :vector( (0.5, 2.5, 4.5) );
SAMGWISE/ScaleVec
…/vector-natural.p6 :8:
my ScaleVec $triad-rat .= new: :vector( (0.5, 2.5, 4.5) );
SAMGWISE/ScaleVec
…/Graph.pm6 :91:
@!pitch-classes .= sort( { $^a.value <=> $^b.value } );
SAMGWISE/ScaleVec
…/Major.t :21:
$major .= new: :chords({ V7 => $major.chords<V>.append(10), });
SAMGWISE/ScaleVec
…/Harm.t :21:
$minor .= new: :chords({ V7 => $minor.chords<V>.append(10), });
SAMGWISE/ScaleVec
…/Nat.t :21:
$minor .= new: :chords({ v7 => $minor.chords<v>.append(10), });
SAMGWISE/ScaleVec
…/Intervalic.t :179:
my ScaleVec $micro .= new( :vector(0, 0.5) );
TBROWDER/Date-Names
…/Names.pm6 :202:
$val .= substr(0, self.trunc);
TBROWDER/Date-Names
…/Names.pm6 :205:
$val .= substr(0, $.trunc);
TBROWDER/Date-Names
…/Names.pm6 :213:
$val .= substr(0, $.trunc);
TBROWDER/Date-Names
…/Names.pm6 :216:
$val .= substr(0, $.trunc);
TBROWDER/Geo-Ellipsoid
…/gentest-ellipsoid.p6 :335:
$code .= "delta_within( \$r, $range, 0.1 );\n";
TBROWDER/Geo-Ellipsoid
…/gentest-ellipsoid.p6 :342:
$code .= "delta_within( \$a, $bearing, 0.0001 );\n";
TBROWDER/Number-More
…/README.md :14:
$results .= trans( 'a'..'z' => 'A'..'Z', 'A'..'Z' => 'a'..'z' );
TBROWDER/Number-More
…/convert-examples.p6 :54:
$line .= trans( 'a'..'z' => 'A'..'Z', 'A'..'Z' => 'a'..'z' );
TIMOTIMO/JSON-Fast
…/Fast.pm :81:
$text .= subst(/ <[\x[10000]..\x[10FFFF]]> /,
TIMOTIMO/JSON-Fast
…/Fast.pm :85:
$text .= subst(/ :m <[\x[10000]..\x[10FFFF]]> /,
TIMOTIMO/JSON-Fast
…/Fast.pm :92:
$text .= subst($chr, '\\u' ~ $ord.fmt("%04x"), :g);
TIMOTIMO/JSON-Fast
…/01-parse.t :203:
$desc .= subst(/\n.*$/, "\\n...[$i]");
TIMOTIMO/JSON-Fast
…/01-parse.t :222:
$desc .= subst(/\n.*$/, "\\n...[$i]");
TIMOTIMO/SDL2-Raw
…/shooter.pl :290:
@enemies .= grep({ $_.pos.im < H + 30 && (!$_.lifetime || $_.lifetime > 0) });
TITSUKI/Algorithm-LBFGS
…/01-basic.t :5:
lives-ok { my Algorithm::LBFGS $lbfgs .= new; }, "Algorithm::LBFGS.new requires no arguments";
TMTVL/Zodiac-Chinese
…/README.md :10:
my ChineseZodiac $zodiac .= new(DateTime.new(year => $year, month => $month));
TMTVL/Zodiac-Chinese
…/Chinese.pm6 :53:
my ChineseZodiac $zodiac .= new(DateTime.new(year => 2018, month => 2));
TYIL/App-Assixt
…/Dist.pm6 :65:
my Version $tar-version .= new: $tar-version-cmd.out.lines[0].split(" ")[*-1];
TYIL/App-Assixt
…/New.pm6 :30:
$dir .= add($config.get("new-module.dir-prefix") ~ $config<runtime><name>.subst("::", "-", :g));
TYIL/Config
…/07-keys.t :11:
my Config $c .= new.read: %(
TYIL/IRC-Client-Plugin-UrlTitle
…/TypeFormatters.pm6 :28:
$size .= round(.1);
UFOBAT/Bailador
…/watch.pm :50:
my Proc::Async $p .= new($*EXECUTABLE.Str, |@includes, $*PROGRAM.Str);
UFOBAT/Temp-Path
…/Path.pm6 :27:
$p .= resolve unless $*DISTRO.is-win;
UGEXE/zef
…/CLI.pm6 :77:
@wants .= map: *.&str2identity;
VRURG/OO-Plugin
…/Manager.pm6 :1296:
my Lock $pq-lock .= new; # Prevent accidental closing of $p-queue before it's stuffed with worker events.
WARRINGD/Font-FreeType
…/BitMap.pm :103:
my buf8 $row .= allocate($.width);
WARRINGD/HTML-Canvas-To-PDF
…/README.md :27:
my PDF::Lite $pdf .= open: "examples/render-pdf-test-sheets.pdf";
WARRINGD/HTML-Canvas-To-PDF
…/render-pdf-test-sheets.t :545:
my HTML::Canvas::Image \image .= open("t/images/camelia-logo.png");
WARRINGD/HTML-Canvas
…/Cairo.pm :108:
my Cairo::Pattern::Surface $patt .= create($padded-img.surface);
WARRINGD/HTML-Canvas
…/Cairo.pm :166:
my Cairo::Matrix $matrix .= new.init: :$xx, :$yx, :$xy, :$yy, :$x0, :$y0;
WARRINGD/HTML-Canvas
…/Cairo.pm :170:
my Cairo::Matrix $matrix .= new.init: :$xx, :$yx, :$xy, :$yy, :$x0, :$y0;
WARRINGD/PDF-Class
…/README.md :19:
my PDF::Class $pdf .= open: "t/helloworld.pdf";
WARRINGD/PDF-Class
…/README.md :87:
my PDF::Class $doc .= open: "t/pdf/samples/OoPdfFormExample.pdf";
WARRINGD/PDF-Class
…/pdf-append.p6 :9:
my PDF::Class $pdf .= open: @files.shift;
WARRINGD/PDF-Class
…/make-quick-ref.pl :9:
my Set $std-methods .= new: flat( <cb-init cb-check cb-finish type subtype <anon> delegate-function delegate-shading>, (PDF::COS::Stream, PDF::COS::Array).map: *.^methods>>.name);
WARRINGD/PDF-Class
…/helloworld.t :118:
lives-ok {$pdf .= open: 't/helloworld-compressed.pdf'}, 'pdf reload lives';
WARRINGD/PDF-Class
…/image-png.t :18:
my PDF::Content::Image::PNG $png1 .= new.read: "t/images/basn0g08.png".IO.open(:r);
WARRINGD/PDF-Class
…/pdf-catalog.t :150:
lives-ok {$catalog .= new( :$dict )}, 'catalog .new with valid /Type - lives';
WARRINGD/PDF-Class
…/pdf-catalog.t :153:
lives-ok {$catalog .= new( :$dict )}, 'catalog .new default /Type - lives';
WARRINGD/PDF-Class
…/pdf-colorspace-devicen.t :6:
my PDF::Class $doc .= open: "t/pdf/colorspace-devicen.in";
WARRINGD/PDF-Class
…/pdf-colorspace.t :130:
my PDF::Function::Exponential $exp-func .= new: :dict{ :Domain[ 0, 1], :Range[flat (0.0, 1.0) xx 4], :C0[0.0 xx 4], :C1[0.85, 0.24, 0.0, 0.0], :N(1.0) };
WARRINGD/PDF-Class
…/pdf-function-postscript.t :61:
my PDF::Function::PostScript::Transform $ps .= new: :@stack, :domain(-Inf..Inf), :range(-Inf..Inf);
WARRINGD/PDF-Class
…/render.t :9:
my PDF::Class $pdf .= open: "t/helloworld.pdf";
WARRINGD/PDF-Class
…/update.t :7:
my PDF::Class $pdf .= open('t/update.pdf');
WARRINGD/PDF-Class
…/update.t :14:
$pdf .= open('t/update.pdf');
WARRINGD/PDF-Class
…/update.t :19:
$pdf .= open('tmp/update-resaved.json');
WARRINGD/PDF-Font-Loader
…/Type1.pm :9:
my PDF::Font::Loader::Type1::Stream $stream .= new: :buf(self.font-stream);
Altai-man/perl6-Compress-Bzip2
…/10-basic.t :23:
my buf8 $buf .= new("Some string".encode);
Bailador/Bailador
…/watch.pm :50:
my Proc::Async $p .= new($*EXECUTABLE.Str, |@includes, $*PROGRAM.Str);
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :113:
$type.fieldlist .= map({ self.resolve-type($_) });
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :117:
$type.fieldlist .= map({ self.resolve-type($_) });
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :119:
$type.interfaces .= map({ self.resolve-type($_) });
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :136:
$type.inputFields .= map({ self.resolve-type($_) });
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :140:
$type.possibleTypes .= map({ self.resolve-type($_) });;
CurtTilmes/Perl6-GraphQL
…/GraphQL.pm :149:
$type.args .= map({ self.resolve-type($_) });
FCO/6pm
…/SixPM.pm6 :8:
has App::six-pm::Meta6 $.meta .= create: $!base-dir.child: "META6.json";
IanTayler/MinG
…/MinG.pm6 :103:
$contents.=subst(/'%COPYFROM'.+'%COPYTO'/, $repeated);
IanTayler/MinG
…/basic.t :48:
ok "[.ROOT [.=A abc ] [.+A jas abc ] ] " eq $q;
IanTayler/MinG
…/basic.t :60:
ok "[.ROOT [.=A abc ] [.C [.=B [.+A gogo ] ] ] [.-C [.=B [.+A gogo ] ] ] ] " eq $q;
Kaiepi/p6-Crypt-CAST5
…/README.md :13:
my Crypt::CAST5 $cast5 .= new: 'ayy lmao'.encode;
Kaiepi/p6-Crypt-CAST5
…/CAST5.pm6 :47:
my Crypt::CAST5 $cast5 .= new: 'ayy lmao'.encode;
Kaiepi/p6-Net-LibIDN
…/StringPrep.pm6 :134:
my Blob[uint32] $output .= new: ($outputptr[$_] for 0..^$written);
Kaiepi/p6-Net-LibIDN
…/StringPrep.pm6 :153:
my Blob[uint8] $output .= new: ($outputptr[$_] for 0..^$written);
MARTIMM/Auth-SCRAM
…/SCRAM.pod6 :112:
my Buf $mangled-password .= new($password.encode);
MARTIMM/Auth-SCRAM
…/201-SCRAM.t :19:
has Buf $!salt .= new((for ^6 { (rand * 256).Int }));
MARTIMM/BSON
…/README.md :35:
my BSON::Binary $bin .= new(:data(Buf,new(... some binary data ...));
MARTIMM/BSON
…/BSON.pm6 :74:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/BSON.pm6 :260:
$ble .= new($b.subbuf( $index, 8));
MARTIMM/BSON
…/BSON.pm6 :264:
$ble .= new($b.subbuf( $index, 8).reverse);
MARTIMM/BSON
…/Document.pod6 :175:
$d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/ObjectId.pm6 :37:
$!oid .= new: ($string.comb(/../) ==> map { :16($_) });
MARTIMM/BSON
…/110-objectid.t :23:
{ my BSON::ObjectId $o .= new(:bytes(Buf.new(5,7,9...15))); },
MARTIMM/BSON
…/120-javascript.t :58:
my BSON::Document $d1 .= new: ( :jsc1($js-scope), :jsc2($js-scope.clone));
MARTIMM/BSON
…/300-document.t :24:
my BSON::Document $d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/300-document.t :109:
my BSON::Document $d .= new: ('a' ... 'z') Z=> 120..145;
MARTIMM/BSON
…/310-document.t :8:
my BSON::Document $d .= new: ('a' ... 'd') Z=> 121..124;
MARTIMM/BSON
…/320-document.t :20:
my BSON::Binary $bin .= new( :data($uuid.Blob), :type(BSON::C-UUID) );
MARTIMM/BSON
…/320-document.t :24:
my DateTime $datetime .= new( DateTime.now.posix, :timezone($*TZ));
MARTIMM/BSON
…/int.pl6 :35:
$ble .= new($b.subbuf( $index, 4));
MARTIMM/BSON
…/int.pl6 :39:
$ble .= new($b.subbuf( $index, 4).reverse);
MARTIMM/BSON
…/int.pl6 :53:
$ble .= new($b.subbuf( $index, 8));
MARTIMM/BSON
…/int.pl6 :57:
$ble .= new($b.subbuf( $index, 8).reverse);
MARTIMM/BSON
…/Document1.pm6 :427:
my BSON::Document $d .= new: ('0' ...^ $p.value.elems.Str) Z=> $p.value;
MARTIMM/BSON
…/Document1.pm6 :641:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/Document2.pm6 :427:
my BSON::Document $d .= new: ('0' ...^ $p.value.elems.Str) Z=> $p.value;
MARTIMM/BSON
…/Document2.pm6 :641:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/BSON
…/Document3.pm6 :613:
my Buf $b .= new($s.encode('UTF-8'));
MARTIMM/config-datalang-refine
…/README.md :12:
my Config::DataLang::Refine $c .= new(:config-name<myConfig.toml>);
MARTIMM/config-datalang-refine
…/README.md :66:
my Config::DataLang::Refine $c .= new(:config-name<mongoservers.toml>);
MARTIMM/config-datalang-refine
…/Refine.pod6 :20:
my Config::DataLang::Refine $c .= new(:config-name<myConfig.toml>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :78:
my Config::DataLang::Refine $c .= new(:config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :85:
$c .= new( :config-name<myCfg.cfg>, :merge);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :126:
my Config::DataLang::Refine $c .= new( :trace, :config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :136:
$c .= new( :config-name<myCfg.cfg>, :merge);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :164:
my Config::DataLang::Refine $c .= new(:config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :178:
$c .= new( :config-name<myCfg.cfg>, :merge);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :191:
$c .= new(:config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :201:
my Config::DataLang::Refine $c .= new(:config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :216:
$c .= new( :config-name<myCfg.cfg>, :merge);
MARTIMM/config-datalang-refine
…/100-refine-toml.t :239:
my Config::DataLang::Refine $c .= new(:config-name<myCfg.cfg>);
MARTIMM/config-datalang-refine
…/200-refine-json.t :97:
$c .= new( :config-name<myCfg.cfg>, :merge, :data-module<JSON::Fast>);
MARTIMM/config-datalang-refine
…/200-refine-json.t :124:
$c .= new( :config-name<myCfg.cfg>, :merge, :data-module<JSON::Fast>);
MARTIMM/config-datalang-refine
…/200-refine-json.t :166:
$c .= new( :config-name<myCfg.cfg>, :merge, :data-module<JSON::Fast>);
MARTIMM/config-datalang-refine
…/200-refine-json.t :179:
$c .= new( :config-name<myCfg.cfg>, :data-module<JSON::Fast>);
MARTIMM/config-datalang-refine
…/200-refine-json.t :206:
$c .= new( :config-name<myCfg.cfg>, :merge, :data-module<JSON::Fast>);
MARTIMM/config-datalang-refine
…/300-refine-locations.t :62:
my Config::DataLang::Refine $c .= new(:config-name<t/cfg-path/myCfg.cfg>);
MARTIMM/config-datalang-refine
…/300-refine-locations.t :79:
$c .= new( :config-name<t/cfg-path/myCfg.cfg>, :merge);
MARTIMM/config-datalang-refine
…/300-refine-locations.t :110:
$c .= new( :config-name<myCfg.cfg>, :merge, :locations(['t/cfg-path']));
MARTIMM/config-datalang-refine
…/ex1-pod.pl6 :8:
my Config::TOML::Refine $c .= new(:config-name<ex1-pod.toml>);
MARTIMM/mongo-perl6-driver
…/sock.pl6 :6:
#$sock .= new( :host<192.168.0.2>, :port(65010));
MARTIMM/mongo-perl6-driver
…/sock.pl6 :7:
#$sock .= new( :host<127.0.0.1>, :port(65010));
MARTIMM/mongo-perl6-driver
…/sock.pl6 :12:
#$sock .= new( :host<localhost.localdomain>, :port(65010));
MARTIMM/mongo-perl6-driver
…/table-role.pm6 :61:
$!record .= new unless $!record.defined;
MARTIMM/mongo-perl6-driver
…/Client.pm6 :53:
# In case of an assignement like $c .= new(...) $c should be cleaned first
MARTIMM/mongo-perl6-driver
…/Client.pod6 :45:
my MongoDB::Client $c .= new( ... );
MARTIMM/mongo-perl6-driver
…/Client.pod6 :57:
$c1 .= new(...);
MARTIMM/mongo-perl6-driver
…/Client.pod6 :63:
$c2 .= new(...);
MARTIMM/mongo-perl6-driver
…/Collection.pm6 :86:
my BSON::Document $req .= new: ( :count($!cl.name), :$query);
MARTIMM/mongo-perl6-driver
…/Header.pm6 :309:
my BSON::Document $document .= new($b.subbuf( $index, $doc-size));
MARTIMM/mongo-perl6-driver
…/Socket.pm6 :28:
$!sock .= new( :host($!server.server-name), :port($!server.server-port));
MARTIMM/mongo-perl6-driver
…/Wire.pm6 :19:
has Duration $!round-trip-time .= new(0.0);
MARTIMM/mongo-perl6-driver
…/300-Collection.t :52:
$req .= new: ( count => $collection.name, query => (name => 'Me T',));
MARTIMM/mongo-perl6-driver
…/300-Collection.t :79:
$req .= new: ( :count($collection.name), :query((:test(0),)));
MARTIMM/mongo-perl6-driver
…/300-Collection.t :83:
$req .= new: ( :count($collection.name), :query((:name('Di D'),)));
MARTIMM/mongo-perl6-driver
…/300-Collection.t :92:
$req .= new: (drop => $collection.name);
MARTIMM/mongo-perl6-driver
…/450-find.t :100:
$req .= new: ( count => $collection.name);
MARTIMM/mongo-perl6-driver
…/110-Client.t :34:
$client .= new(:uri("mongodb://$server-name/?" ~ @options.join('&')));
MARTIMM/mongo-perl6-driver
…/110-Client.t :45:
$client .= new(:uri("mongodb://$server-name/?" ~ @options.join('&')));
MARTIMM/mongo-perl6-driver
…/110-Client.t :60:
$client .= new(:uri("mongodb://$server-name/?" ~ ~ @options.join('&')));
MARTIMM/mongo-perl6-driver
…/110-Client.t :82:
$client .= new(:uri("mongodb://$server-name/?" ~ ~ @options.join('&')));
MARTIMM/unicode-precis
…/generate-module.pl6 :63:
my Map $names .= new( $fields.split(/\h* ',' \h*/).kv );
Mouq/json5
…/01-parse.t :198:
$desc .= subst(/\n.*$/, "\\n...[$i]");
Mouq/json5
…/01-parse.t :212:
$desc .= subst(/\n.*$/, "\\n...[$i]");
Perl6-Noise-Gang/p6-Music-Helpers
…/example.pl6 :44:
$next-chord .= invert(-1) while any($next-chord.notes>>.octave) > 4;
Perl6-Noise-Gang/p6-Music-Helpers
…/example.pl6 :45:
$next-chord .= invert( 1) while any($next-chord.notes>>.octave) < 4;
Perl6-Noise-Gang/p6-Music-Helpers
…/Helpers.pm :368:
$new-chord .= invert(-1) while self.normal.root < $new-chord.root;
Perl6-Noise-Gang/p6-Music-Helpers
…/Helpers.pm :369:
$new-chord .= invert( 1) while self.normal.root > $new-chord.root;
Perl6-Noise-Gang/p6-Music-Helpers
…/Helpers.pm :480:
@!notes .= sort({ $^a.midi <=> $^b.midi });
Skarsnik/gptrixie
…/gptrixie :190:
@(%toret{$k}).=sort: {$^a<obj>.start-line > $^b<obj>.start-line};
Skarsnik/gptrixie
…/gptrixie :304:
my StructType $t .= new(:id($s.id), :name($s.name));
Skarsnik/gptrixie
…/gptrixie :334:
my EnumValue $nv .= new(:name($enumv.attribs<name>), :init($enumv.attribs<init>));
Skarsnik/gptrixie
…/gptrixie :347:
my FunctionArgument $a .= new(:name($param.attribs<name>));
Skarsnik/gptrixie
…/FileGenerator.pm6 :112:
@(%toret{$k}).=sort: {$^a<obj>.start-line > $^b<obj>.start-line};
Tux/CSV
…/CSV.pod6 :1617:
my CSV::Row $row .= new(csv => $csv, fields => @f.map({ CSV::Field.new(*) });
ab5tract/Terminal-Print
…/ParticleEffect.pm6 :34:
@!particles .= grep: { .age < .life }
andydude/p6-c-parser
…/Utils.pm6 :18:
$out.=subst(rx{',' <.ws>}, ",\n", :g);
atweiden/file-path-resolve
…/absolute.t :25:
my IO::Path $expected .= new(sprintf(Q{%s/.config/conky/conkyrc}, $*HOME));
atweiden/file-path-resolve
…/relative.t :12:
my IO::Path $expected .= new('t/data/conky/scripts/script.lua');
atweiden/mktxn
…/README.md :25:
my Version $pkgver .= new('1.0.0');
atweiden/mktxn
…/mktxn.t :18:
my Version $pkgver .= new('1.0.0');
atweiden/sustenance
…/Sustenance.pm6 :97:
my DateTime $dt1 .= new(|%date, |$t1.hash);
atweiden/sustenance
…/Sustenance.pm6 :98:
my DateTime $dt2 .= new(|%date, |$t2.hash);
azawawi/perl6-gtk-scintilla
…/perl-test-5220delta.pl :37:
$b&.='20'; $b|.='20'; $b^.='20';
azawawi/perl6-gtk-scintilla
…/perl-test-5220delta.pl :39:
$d&.=$e; $d|.=$e; $d^.=$e;
azawawi/perl6-gtk-scintilla
…/perl-test-5220delta.pl.styled :37:
{12}$b{10}&.={7}'20'{10};{0} {12}$b{10}|.={7}'20'{10};{0} {12}$b{10}^.={7}'20'{10};{0}
azawawi/perl6-gtk-scintilla
…/perl-test-5220delta.pl.styled :39:
{12}$d{10}&.={12}$e{10};{0} {12}$d{10}|.={12}$e{10};{0} {12}$d{10}^.={12}$e{10};{0}
bbkr/GeoIP2
…/00-reader.t :90:
%got{ 'double' } .= round( 0.000001 );
bbkr/GeoIP2
…/00-reader.t :91:
%got{ 'float' } .= round( 0.1 );
coke/p6-uni
…/Uni.pm :36:
hyper for @strings -> $criteria { $sieve .= grep({uniname($_).fc.contains($criteria)}) };
coke/p6-uni
…/Uni.pm :37:
hyper for @regexes -> $criteria { $sieve .= grep({uniname($_).fc ~~ $criteria}) };
colomon/ABC
…/abc2ly :554:
@names .= map(-> $full-name { $full-name.substr($name.chars).trim });
cosimo/perl6-digest-md5
…/perl5-compat.t :38:
my Buf $b .= new( map( {:16($_.Str)}, @($/[0][*])));
cosimo/perl6-digest-md5
…/perl5-compat.t :50:
$b .= new( map( {:16($_.Str)}, @($/[0][*])));
drforr/perl6-Perl6-Parser
…/rosetta-1.t :19:
(.=not for @doors[0, $_ ... 100]) for 1..100;
edumentab/p6-moarvm-remote
…/Remote.pm6 :228:
@!request-promises .= grep(*.key != $message<id>) with $task;
edumentab/p6-moarvm-remote
…/MoarRemoteTest.pm6 :241:
@params .= map({ $_ = $_.() if $_ ~~ Callable; $_ });
fayland/perl6-Cache-LRU
…/LRU.pm :49:
@!fifo .= grep( { %need{$_.[0]}:delete } );
finanalyst/pod-cached
…/Cached.pm6 :208:
my SetHash $old .= new( %!files.keys );
finanalyst/pod-cached
…/100-heavy-duty.t :34:
lives-ok { $cache .= new(:path<t/tmp/ref>, :source<t/tmp/doc>); $cache.update-cache }, 'dry run lives';
finanalyst/pod-render
…/README.md :83:
For example, if `PodCache::Render $renderer .=new(:assets<assets>, :output<html>)>` and `$?CWD/assets/root/favicon.ico`,
finanalyst/pod-render
…/Engine.pm6 :31:
my SetHash $missing .= new: %!tmpl.keys;
finanalyst/pod-render
…/HTML2.pm6 :25:
#my PodCache::Processed $p .= new(:name(&?ROUTINE.name), :$pod-tree, :verbose, :!debug);
finanalyst/pod-render
…/Processed.pm6 :133:
my Set $internal .= new: gather for %.index.values -> @items { take .<target> for @items }
finanalyst/pod-render
…/Processed.pm6 :486:
my LibCurl::Easy $curl .= new( :URL($link), :followlocation, :verbose($pf.verbose) );
finanalyst/pod-render
…/Render.pm6 :92:
For example, if C<PodCache::Render $renderer .=new(:assets<assets>, :output<html>)> and C<$?CWD/assets/root/favicon.ico>,
finanalyst/pod-render
…/Render.pm6 :453:
my Set $gtargets .= new: gather for %!global-index.kv -> $fn, %entries {
finanalyst/pod-render
…/Render.pm6 :461:
my @glinks .= append( |$_ ) for %!global-links.values;
finanalyst/pod-render
…/Render.pm6 :704:
my SetHash $residue .= new: %gindex.keys;
gabrielash/perl6-zmq
…/Socket.pm :368:
my buf8 $buf .= new( (0..^$max-recv-bytes).map( { 0;} ));
gabrielash/perl6-zmq
…/Socket.pm :436:
my buf8 $buf .= new( (0..^$sz).map( { $data[$_]; } ));
gabrielash/perl6-zmq
…/Socket.pm :484:
my buf8 $buf .=new( (0..$size).map( { 0;} ));
gabrielash/perl6-zmq
…/Socket.pm :492:
my buf8 $buf .=new( (0..^$size).map( { 0;} ));
gabrielash/perl6-zmq
…/Socket.pm :520:
my buf8 $buf .= new( |$value.encode('UTF-8'));
gfldex/perl6-meta6-bin
…/bin.pm6 :203:
$repo.=subst(/'.git'$/, '');
gfldex/perl6-meta6-bin
…/bin.pm6 :290:
$repo.=subst(/'.git'$/, '');
gfldex/perl6-typesafe-xhtml-writer
…/generate-function-definition.p6 :57:
\@c.=map: \{ .item ~~ HTML ?? .item !! $Guard.new ~ .Str \};
gfldex/perl6-typesafe-xhtml-writer
…/Skeleton.pm6 :8:
@children.=map: { .item ~~ HTML ?? .item !! HTML.new ~ .item }
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :13:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :32:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :52:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :71:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :88:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :111:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :150:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :173:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :194:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :226:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :260:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :292:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :324:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :356:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :388:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :420:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :452:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :484:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :516:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :548:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :580:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :612:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :644:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :676:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :708:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :740:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :772:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :805:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :838:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :872:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :906:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :951:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :983:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1015:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1034:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1066:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1098:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1130:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1162:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1194:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1226:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1258:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1290:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1322:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1354:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1387:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1419:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1451:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1483:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1515:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1547:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1579:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1611:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1656:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1676:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1715:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1748:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1789:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1828:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1864:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1914:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1954:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :1988:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2024:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2067:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2099:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2132:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2172:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2211:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2243:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2279:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2315:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2351:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2389:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2427:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2463:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
gfldex/perl6-typesafe-xhtml-writer
…/Writer.pm6 :2505:
@c.=map: { .item ~~ HTML ?? .item !! $Guard.new ~ .Str };
jnthn/test-mock
…/Mock.pm6 :20:
@calls .= grep({ .<capture> eqv $with });
jnthn/test-mock
…/Mock.pm6 :23:
@calls .= grep({ .<capture> ~~ $with });
labster/p6-IO-Path-More
…/README.md :19:
$path3.=append("erf", 'quux.txt'); # "/new/directory/tree/erf/quux.txt"
labster/p6-IO-Path-More
…/README.md :46:
Note that the methods do not actually transform the object, but rather return a new IO::Path::More object. Therefore, if you want to change the path, use a mutating method, like `$path.=absolute`.
masak/007
…/ROADMAP.md :73:
* `.=` mutating method call. Also requires the location protocol.
masak/007
…/Val.pm6 :714:
$name.=subst(/"::"/, ".", :g);
moznion/p6-Log-Minimal
…/Minimal.pm6 :117:
# $messages.=subst(/<[\r\n\t]>/, { sprintf('\\x%02x', $_.ord) }, :g)
nkh/P6-Data-Dump-Tree
…/untyped_elements.pl :28:
@elements .= map: { $_[2].^name ~~ /^IntStr/ ?? (|$_[0,1], NoType.new(:val($_[2]))) !! $_ }
ohmycloud/fanfou-p6
…/FanFou.pm6 :15:
sub oauth_normalized_url($url) { my URI $u .= new($url); return sprintf('%s://%s%s', $u.scheme, $u.host, $u.path) }
p6-pdf/Crypt-RC4-p6
…/00basic.t :50:
my Crypt::RC4 $one .= new(:key("This is my passphrase".encode));
p6-pdf/Crypt-RC4-p6
…/00basic.t :54:
my Crypt::RC4 $two .= new(:key("This is my passphrase".encode));
p6-pdf/Native-Packing-p6
…/Packing.pm :101:
my buf8 $native .= new: $buf.subbuf($off, $byte-count).reverse;
p6-pdf/PDF-API6
…/README.md :161:
my PDF::API6 $pdf .= open('some.pdf');
p6-pdf/PDF-API6
…/README.md :224:
my PDF::API6 $pdf .= open('our/old.pdf');
p6-pdf/PDF-API6
…/README.md :229:
my PDF::API6 $pdf2 .= open($pdf.Blob);
p6-pdf/PDF-API6
…/README.md :245:
my PDF::API6 $pdf .= open('our/to/be/updated.pdf');
p6-pdf/PDF-API6
…/README.md :259:
PDF::API6 $pdf .= open("our/original.pdf");
p6-pdf/PDF-API6
…/README.md :266:
PDF::API6 $pdf .= open("our/original.pdf");
p6-pdf/PDF-API6
…/README.md :358:
my PDF::API6 $old .= open('our/old.pdf');
p6-pdf/PDF-API6
…/README.md :430:
my PDF::API6 $pdf .= open("tmp/hello-world.pdf");
p6-pdf/PDF-API6
…/README.md :801:
my PDF::API6 $pdf .= open: "tmp/basic.pdf";
p6-pdf/PDF-API6
…/README.md :831:
my PDF::API6 $pdf .= open: "t/pdf/OoPdfFormExample.pdf";
p6-pdf/PDF-API6
…/README.md :856:
my PDF::API6 $pdf .= open: "my-form.pdf";
p6-pdf/PDF-API6
…/API6.pm :313:
my buf8 $decoded .= new: @samples.flat.map: {(min($_,1.0) * 255).round};
p6-pdf/PDF-API6
…/fields.t :13:
my PDF::API6 $pdf .= open("t/pdf/OoPdfFormExample.pdf");
p6-pdf/PDF-Content-p6
…/README.md :35:
my PDF::Content::XObject $image .= open: "t/images/lightbulb.gif";
p6-pdf/PDF-Content-p6
…/PNG.pm :98:
my Quad $len .= new: :Numeric($data.bytes);
p6-pdf/PDF-Content-p6
…/PNG.pm :102:
my Quad $crc .= new: :Numeric(self!crc($hdr.encode, $data));
p6-pdf/PDF-Content-p6
…/graphics-raw.t :13:
my Graphics $gfx .= new(:decoded("BT ET .5 0 0 rg"));
p6-pdf/PDF-Content-p6
…/graphics-raw.t :16:
$gfx .= new(:decoded("BT ET .5 0 0 rg"));
p6-pdf/PDF-Content-p6
…/graphics-raw.t :19:
$gfx .= new(:decoded("BT ET q .5 0 0 rg Q"));
p6-pdf/PDF-Content-p6
…/images.t :14:
lives-ok {$jpeg .= open: "t/images/jpeg.jpg";}, "open jpeg - lives";
p6-pdf/PDF-Content-p6
…/images.t :29:
lives-ok {$gif .= open: "t/images/lightbulb.gif";}, "open gif - lives";
p6-pdf/PDF-Content-p6
…/text-block-images.t :23:
my PDF::Content::XObject $image .= open: "t/images/lightbulb.gif";
p6-pdf/PDF-Lite-p6
…/README.md :410:
my PDF::Lite $pdf .= open: "examples/hello-world.pdf";
p6-pdf/PDF-p6
…/README.md :86:
my PDF $pdf .= open: 'examples/helloworld.pdf';
p6-pdf/PDF-p6
…/PDF.pm :94:
my PDF::IO::Serializer $serializer .= new( :$.reader, :$type );
p6-pdf/PDF-p6
…/Crypt.pm :157:
my buf8 $out .= allocate($in.bytes);
p6-pdf/PDF-p6
…/Crypt.pm :165:
my Buf $key .= new: $code.map( * +^ iter );
p6-pdf/PDF-p6
…/AESV2.pm :54:
my Buf $iv .= new( (^256).pick xx KeyLen );
p6-pdf/PDF-p6
…/AESV2.pm :61:
my Buf $iv .= new: $enc-iv[0 ..^ KeyLen];
p6-pdf/PDF-p6
…/Util.pm :100:
my buf8 $out .= allocate($W.sum * +$shaped);
p6-pdf/PDF-p6
…/indobj-stream.t :22:
lives-ok { $ind-obj .= new( :ind-obj[123, 1, $stream-obj.content] ); }, 'stream object rebuilt';
p6-pdf/PDF-p6
…/indobj.t :26:
my PDF::COS $num-obj .= coerce( :real(4.2) );
p6-pdf/PDF-p6
…/pdf-crypt-aes.t :10:
my PDF $pdf .= open: "t/pdf/samples/00helloworld.pdf";
p6-pdf/PDF-p6
…/pdf-crypt-aes.t :21:
dies-ok { $pdf .= open: "t/pdf-crypt-aes.pdf", :password<dunno> }, "open encrypted with incorrect password - dies";
p6-pdf/PDF-p6
…/pdf-crypt-aes.t :23:
lives-ok { $pdf .= open("t/pdf-crypt-aes.pdf", :password($user-pass)) }, 'open with user password - lives';
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :11:
my PDF $pdf .= open: "t/pdf/samples/00helloworld.pdf";
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :23:
dies-ok { $pdf .= open: "t/encrypt.pdf", :password<dunno> }, "open encrypted with incorrect password - dies";
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :25:
lives-ok { $pdf .= open("t/pdf-crypt-rc4.pdf", :password($user-pass)) }, 'open with user password - lives';
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :33:
lives-ok { $pdf .= open("t/pdf-crypt-rc4.pdf", :password($owner-pass)) }, 'open with owner password - lives';
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :38:
dies-ok { $pdf .= open: "tmp/pdf-crypt-rc4.json", :password<dunno> }, "open encrypted json with incorrect password - dies";
p6-pdf/PDF-p6
…/pdf-crypt-rc4.t :40:
lives-ok { $pdf .= open("tmp/pdf-crypt-rc4.json", :password($user-pass)) }, 'open json user password - lives';
p6-pdf/PDF-p6
…/pdf-reencrypt.t :10:
my PDF $pdf .= open: "t/pdf/samples/encrypt-40bit.pdf", :password<owner>;
p6-pdf/PDF-p6
…/pdf-reencrypt.t :20:
lives-ok {$pdf .= open: "t/pdf-reencrypt.pdf"}, 'open lives';
p6-pdf/PDF-p6
…/update-encrypted.t :12:
my PDF $pdf .= open: "t/update-encrypted.pdf", :password<owner>;
p6-pdf/PDF-p6
…/update.t :18:
my PDF $pdf .= open( 't/pdf/pdf.in' );
p6-pdf/PDF-p6
…/update.t :78:
$pdf .= open('t/pdf/pdf-updated.out');
p6-pdf/PDF-p6
…/write-pdf.t :27:
my PDF::IO $input .= coerce( $pdf-input-file.IO );
p6-pdf/PDF-p6
…/write-pdf.t :39:
my PDF::IO $output .= coerce( $pdf-output-file.IO );
perl6-community-modules/p6-irc-utils
…/Utils.pm :775:
$value.=trans('a..z' => 'A..Z');
perl6-community-modules/p6-irc-utils
…/Utils.pm :779:
$value.=trans('a..z{}|' => 'A..Z[]\\');
perl6-community-modules/p6-irc-utils
…/Utils.pm :783:
$value.=trans('a..z{}|^' => 'A..Z[]\\~');
perl6-community-modules/p6-irc-utils
…/Utils.pm :793:
$value.=trans('A..Z' => 'a..z');
perl6-community-modules/p6-irc-utils
…/Utils.pm :797:
$value.=trans('A..Z[]\\' => 'a..z{}|');
perl6-community-modules/p6-irc-utils
…/Utils.pm :801:
$value.=trans('A..Z[]\\~' => 'a..z{}|^');
perl6-community-modules/p6-irc-utils
…/Utils.pm :970:
$umask.=subst('*', '.*', :g);
perl6-community-modules/p6-irc-utils
…/Utils.pm :971:
$umask.=subst('?', '.', :g);
perl6-community-modules/uri
…/README.md :9:
my URI $u .= new('http://her.com/foo/bar?tag=woow#bla');
perl6/Blin
…/blin.p6 :259:
@modules .= grep: *.needed;
perl6/doc
…/p6doc :181:
$pod.=subst(/"{$*SPEC.dir-sep}"/,'::',:g);
perl6/doc
…/5to6-perlop.pod6 :235:
not separated into numeric and string versions (C<&=>, etc., vs. C<&.=>, etc.),
perl6/doc
…/operators.pod6 :22:
L | Method postfix | .meth .\+ .? .* .() .[] .{} .<> .«» .:: .= .^ .:
perl6/doc
…/operators.pod6 :26:
L | Dotty infix | .= .
perl6/doc
…/syntax.pod6 :948:
$x .= child # Equivalent to $x = $x.child
perl6/doc
…/Buf.pod6 :48:
my Buf $b .= new(0..5);
perl6/doc
…/Buf.pod6 :56:
my Buf $b .= new(0..5);
perl6/doc
…/Buf.pod6 :63:
my Buf $b .= new(0..5);
perl6/doc
…/Hash.pod6 :256:
my %inv .= push: %wc.invert;
perl6/doc
…/Pair.pod6 :316:
$p.=Map.=head.say; # OUTPUT: «orange␤»
perl6/doc
…/Signature.pod6 :386:
thus you cannot use the C<.=> operator, for example.
perl6/doc
…/Str.pod6 :974:
$some-string.=subst(/foo/, "string"); # in-place substitution. $some-string is now 'Some string'
perl6/doc
…/Str.pod6 :1047:
L«C<.=> method call assignment operator|/routine/.=.html» or
perl6/doc
…/Str.pod6 :1300:
$str.=trans( ['a'..'y'] => ['A'..'z'] );
perl6/doc
…/WhateverCode.pod6 :35:
my Cycle $c .= new(:pos(2), :vals(0..^10));
perl6/doc
…/list-missing-methods.p6 :42:
$method-names.=split(' ').Set;
perl6/form
…/Field.pm :75:
@lines.=map: { $justify-function($_, $.width, ' ') };
perl6/perl6-http-server-async
…/Async.pm6 :69:
my Buf $rn .=new("\r\n\r\n".encode);
perl6/perl6-http-server-async
…/Async.pm6 :194:
my Buf $rn .=new("\r\n".encode);
perl6/whateverable
…/Config.pm6 :35:
$CONFIG<repo-current-rakudo-moar> .= IO .= absolute;
perl6/whateverable
…/Config.pm6 :36:
$CONFIG<repo-current-moarvm> .= IO .= absolute;
perl6/whateverable
…/Config.pm6 :37:
$CONFIG<archives-location> .= IO .= absolute;
perl6/whateverable
…/Config.pm6 :38:
$CONFIG<builds-location> .= IO .= absolute;
perl6/whateverable
…/Config.pm6 :39:
$CONFIG<moarvm> .= IO .= absolute;
perl6/whateverable
…/Config.pm6 :40:
$CONFIG<bisectable><build-lock> .= IO .= absolute;
perl6/whateverable
…/Messages.pm6 :53:
@files .= map({ ‘uncommitted-’ ~ .split(‘/’).tail => .IO.slurp });
perl6/whateverable
…/Coverable.p6 :124:
$fname .= substr(9) if $fn.starts-with(‘SETTING::’);
perl6/whateverable
…/Releasable.p6 :203:
$wiki .= subst: /^ .*? ^^<before New>/, ‘’;
perl6/whateverable
…/Squashable.p6 :156:
$body .= subbuf: 0..^($body - 1) if $body[*-1] == 0; # TODO trailing null byte. Why is it there?
perl6/whateverable
…/Unicodable.p6 :142:
for @words -> $word { $sieve .= grep({uniname($_).contains($word)}) };
ppentchev/Serialize-Naive
…/README.md :35:
my Polygon $sq .= new(:label("A. Square"),
ppentchev/Serialize-Naive
…/Naive.pm6 :151:
my Polygon $sq .= new(:label("A. Square"),
ppentchev/Shell-Capture
…/README.md :37:
$c .= capture-check('env', 'LANG=fr_FR.ISO-8859-1', 'date', :enc('ISO-8859-1'));
ppentchev/Shell-Capture
…/Capture.pm6 :67:
$c .= capture-check('env', 'LANG=fr_FR.ISO-8859-1', 'date', :enc('ISO-8859-1'));
raydiak/Git-PurePerl
…/Commit.pm :25:
$content .= 'tree ' . $self->tree . "\n";
raydiak/Git-PurePerl
…/Commit.pm :26:
$content .= 'parent ' . $self->parent . "\n" if $self->parent;
raydiak/Git-PurePerl
…/Tree.pm :23:
.= $de->mode . ' '
raydiak/Math--ThreeD
…/Generator.pm :207:
@expressions .= map: { "$_@i.shift()" };
raydiak/Math-Symbolic
…/Symbolic.pm6 :491:
%subvar_count .= grep: *.value;
raydiak/Math-Symbolic
…/Symbolic.pm6 :517:
$vars.hash .= grep: { my $v := .value; $v[0] || $v.elems > 1 };
raydiak/Math-Symbolic
…/Symbolic.pm6 :966:
$children .= reverse if $syn.reverse;
raydiak/Math-Symbolic
…/Operation.pm6 :61:
$str .= reverse if $.reverse;
raydiak/Math-Symbolic
…/Operation.pm6 :62:
$str .= join: @.parts[0];
raydiak/pray
…/Object.pm6 :40:
$transform .= multiply( m3d.rotate($axis, $angle) );
raydiak/pray
…/Object.pm6 :46:
$transform .= multiply( m3d.translate(|%args) );
raydiak/pray
…/Object.pm6 :176:
@return .= grep: { !$obj.contains_point($_[0], csg => self) };
raydiak/pray
…/Object.pm6 :190:
@return .= grep: { !$obj.contains_point($_[0], csg => self, :$transform) };
raydiak/pray
…/Object.pm6 :206:
@return .= grep: { $obj.contains_point($_[0], csg => self) };
raydiak/pray
…/Light.pm6 :44:
$shadow .= scale(.color_scaled) for @filters;
raydiak/pray
…/Lighting.pm6 :189:
$refract_color .= scale($.color_scaled) unless $int.exiting;
raydiak/pray
…/Material.pm6 :34:
$color .= add( $.diffuse.color_shaded(
raydiak/pray
…/Material.pm6 :40:
$color .= add( $.specular.color_shaded(
raydiak/pray
…/Material.pm6 :48:
$color .= add( $.reflective.color_shaded(
retupmoca/P6-Net-IMAP
…/Simple.pm6 :72:
@messages .= map({ Net::IMAP::Message.new(:imap(self), :mailbox($.mailbox), :sid($_)) });
retupmoca/P6-Net-SMTP
…/Simple.pm6 :191:
@to .= map({ $_ ~~ /\<(.*)\>/; $0 || $_ });
retupmoca/P6-XML-Canonical
…/Canonical.pm6 :85:
@keys .= grep(&_needed_attribute.assuming($xml));
retupmoca/P6-XML-Canonical
…/Canonical.pm6 :123:
@keys .= sort(&_sort_attributes.assuming($xml));
retupmoca/P6-XML-Signature
…/Signature.pm6 :82:
@certs .= map({ $_.contents.join });
salortiz/JsonC
…/benchmark.pl6 :13:
@repos.=grep(*.defined);
salortiz/JsonC
…/00-basic.t :69:
@repos.=grep(*.defined);
salortiz/JsonC
…/01-parse.t :198:
$desc .= subst(/\n.*$/, "\\n...[$i]");
salortiz/JsonC
…/01-parse.t :217:
$desc .= subst(/\n.*$/, "\\n...[$i]");
salortiz/NativeHelpers-Blob
…/02-cstruct.t :106:
my LinearArray[Point3D] $lum .= new-from-pointer(:ptr($la.Pointer), :10size);
salortiz/NativeHelpers-Blob
…/03-pointer.t :9:
my CArray[uint16] $a .= new: 10, 20 ... 100;
samgwise/Net-OSC
…/Bundle.t :19:
my Net::OSC::Message $message .= new( :args<Hey 123 45.67> );
samgwise/p6-Numeric-Pack
…/01-basic.t :68:
$nan-buffer .= new(|$nan-buffer[0..3], 0xff, 0xff, 0xff, 0xff);
samgwise/p6-algorithm-genetic
…/Genetic.pm6 :178:
@!population .= sort: {$^a.score <=> $^b.score }
sergot/bamboo
…/bamboo :64:
$module .= substr(0, rindex $module, '.');
sergot/http-useragent
…/Cookies.pm6 :112:
@.cookies .= grep({ .name ne $c.name });
sergot/io-socket-ssl
…/SSL.pm6 :56:
%args<listening>.=Bool if %args.EXISTS-KEY('listen');
skids/perl6sum
…/adler.t :28:
is ([+] (for ^221 { $flfoo .= new(); $flfoo.finalize(^250, $_); $flfoo.finalize($flfoo.checkvals)})), 0, 'custom Fletcher checkvals produce zero sum across values sweep.';
skids/perl6sum
…/adler.t :43:
is ([+] (for ^255 { $fl16 .= new(); $fl16.finalize(^250, $_); $fl16.finalize($fl16.checkvals)})), 0, 'Fletcher16 checkvals produce zero sum across values sweep.';
softmoth/p6-Template-Mustache
…/TestUtil.pm :18:
@files .= grep: { .basename eq "$file.json" } if $file;
softmoth/perl6-pod-to-markdown
…/Markdown.pm6 :127:
$name .= subst('!', '.') if .has_accessor;
spitsh/spitsh
…/Exceptions.pm6 :36:
@marks .= sort({ .<to> || .<match>.to });
spitsh/spitsh
…/Actions.pm6 :806:
SX::Invalid.new(invalid => 'RHS for ‘.=’').throw;
spitsh/spitsh
…/SAST.pm6 :145:
$b .= force($self.type, $self.itemize);
spitsh/spitsh
…/SAST.pm6 :366:
$_ .= do-stage2(self.type,:$.desc) with $.assign;
spitsh/spitsh
…/SAST.pm6 :646:
$_ .= do-stage2(tStr) for ($!pipe-in,|@.nodes,|%!set-env.values).grep(*.defined);
spitsh/spitsh
…/SAST.pm6 :992:
$_ .= do-stage2($!type, :desc("parameter {$.spit-gist}'s default")) with $!default;
spitsh/spitsh
…/SAST.pm6 :1091:
$_ .= do-stage2(tAny,:!auto-inline) for self.children;
spitsh/spitsh
…/SAST.pm6 :1106:
$_ .= do-stage2(tInt,:desc("arguments to $!sym operation")) for @.children;
spitsh/spitsh
…/SAST.pm6 :1123:
$_ .= do-stage2($type,:desc("arguments to $!sym comparison must be {$type.^name}")) for @.children;
spitsh/spitsh
…/SAST.pm6 :1282:
$_ .= do-stage2(tStr) for @.children;
spitsh/spitsh
…/SAST.pm6 :1301:
$_ .= do-stage2($ctx ~~ tList ?? $ctx !! tStr) for @.children;
spitsh/spitsh
…/SAST.pm6 :1358:
$_ .= do-stage2(tStr) for @.children;
spitsh/spitsh
…/SAST.pm6 :1585:
self[0] .= do-stage2(self.type,:desc("didn't match primitive"));
spitsh/spitsh
…/SAST.pm6 :1600:
$_ .= do-stage2(tInt) for self.children;
spitsh/spitsh
…/SAST.pm6 :1614:
$_ .= do-stage2(tAny) for @.children;
spitsh/spitsh
…/Composer.pm6 :449:
$val .= do-stage2($THIS.type);
spitsh/spitsh
…/Composer.pm6 :461:
$val .= do-stage2($THIS.ctx);
spitsh/spitsh
…/Composer.pm6 :615:
$THIS .= stage3-node(SAST::BVal,val => !$THIS.when);
spitsh/spitsh
…/Composer.pm6 :650:
$THIS .= &reduce-block if $THIS.auto-inline;
spitsh/spitsh
…/Method-Optimizer.pm6 :206:
$THIS .= stage3-node(SAST::SVal,val => $ct.name);
spitsh/spitsh
…/Method-Optimizer.pm6 :241:
$THIS .= stage3-node(SAST::SVal, val => $ct.&to-json);
spitsh/spitsh
…/Method-Optimizer.pm6 :255:
$THIS .= stage3-node(SAST::SVal, val => $ct.join($joiner));
spitsh/spitsh
…/scalar-assignment.t :42:
is $str, 'fee', '$str .= ...';
spitsh/spitsh
…/scalar-assignment.t :45:
is $str, 'fEE', '.= ${ ... }';
spitsh/spitsh
…/exceptions.t :57:
throws-like { compile('my $a = "foo"; $a .= "foo".${cat}',:$name) },
supernovus/exemel
…/Text.pm6 :20:
$text.=chomp; ## Remove a trailing newline if it exists.
supernovus/flower
…/TALES.pm6 :143:
@result>>.=subst(:g, /'$('(.*?)')'/, -> $/ { '${'~$0~'}' });
supernovus/perl6-web
…/Request.pm6 :192:
$string .= subst( $0.Str,
supernovus/template6
…/Parser.pm6 :133:
$stmt .= subst(/^(\w+)$/, -> $word { "\$stash.get('$word')" });
tadzik/Module-Toolkit
…/Fetcher.pm :8:
$from.=subst(/ '@' (<[ . / ]+alpha+digit>+) $/, { $commit = $0; "" });
tadzik/panda
…/01-parse.t :198:
$desc .= subst(/\n.*$/, "\\n...[$i]");
tadzik/panda
…/01-parse.t :217:
$desc .= subst(/\n.*$/, "\\n...[$i]");
tadzik/panda
…/App.pm :15:
@repos.=grep(*.defined);
tadzik/panda
…/App.pm :47:
@projects .= grep({ $es.project-get-state($_) ne Panda::Project::State::absent })
tadzik/panda
…/Fetcher.pm :8:
$from.=subst(/ '@' (<[ . / ]+alpha+digit>+) $/, { $commit = $0; "" });
thundergnat/Acme-Scrub
…/Scrub.pm6 :9:
$wash .= subst(/$suds.*$/, '');
thundergnat/Lingua-EN-Numbers-Cardinal
…/Cardinal.pm6 :27:
$rat .= Numeric.Rat;
timo/cairo-p6
…/gradient.p6 :7:
my Cairo::Pattern::Gradient::Linear $lpat .= create(0.0, 0.0, 0.0, 256.0);
timo/cairo-p6
…/gradient.p6 :15:
my Cairo::Pattern::Gradient::Radial $rpat .= create(115.2, 102.4, 25.6,
timo/cairo-p6
…/image-pattern.p6 :11:
my Cairo::Pattern::Surface $pattern .= create($image.surface);
timo/cairo-p6
…/image-pattern.p6 :19:
my Cairo::Matrix $matrix .= new.scale(w/256.0 * 5.0, h/256.0 * 5.0);
timo/cairo-p6
…/Cairo.pm6 :907:
my Context $ctx .= new(my $surface = self.new($content));
timo/cairo-p6
…/matrix.t :23:
my Matrix $transform-matrix .= new.init( :xx(1), :yx(0.5),
titsuki/p6-App-AizuOnlineJudge
…/BasicCourse.pm6 :68:
my DateTime $submission-date .= new($xml[0].elements(:TAG('submission_date'), :SINGLE).contents.shift.text.Int / 1000);
titsuki/p6-App-AizuOnlineJudge
…/IntroductionCourse.pm6 :71:
my DateTime $submission-date .= new($xml[0].elements(:TAG('submission_date'), :SINGLE).contents.shift.text.Int / 1000);
tmtvl/Zodiac-Chinese
…/README.md :10:
my ChineseZodiac $zodiac .= new(DateTime.new(year => $year, month => $month));
tmtvl/Zodiac-Chinese
…/Chinese.pm6 :53:
my ChineseZodiac $zodiac .= new(DateTime.new(year => 2018, month => 2));
tony-o/perl6-digest-fnv
…/00-basic.t :21:
$tstr .=substr(0..10)
tony-o/perl6-encoding-huffman-pp6
…/PP6.pm6 :265:
my Buf[uint8] $enc .=new((0..($bits.codes/8).ceiling).map({ 0 }));
tony-o/perl6-event-emitter-interprocess
…/README.md :17:
my Proc::Async $child .=new(:w, 'perl6', '-Ilib', 'child.pl6');
tony-o/perl6-event-emitter-interprocess
…/parent.pl6 :6:
my Proc::Async $proc .= new(:w, 'perl6', '-Ilib', 'child.pl6');
tony-o/perl6-event-emitter-interprocess
…/01-simple.t :11:
my Proc::Async $proc .= new('perl6', '-Ilib', $*SPEC.catpath('', 't', 'simple.pl6'));
tony-o/perl6-event-emitter-interprocess
…/02-child-echo.t :10:
my Proc::Async $proc .= new(:w, 'perl6', '-Ilib', $*SPEC.catpath('', 't', 'child-echo.pl6'));
tony-o/perl6-event-emitter-interprocess
…/parent.pl6 :5:
my Proc::Async $child .=new(:w, 'perl6', '-I../lib', 'child.pl6');
tony-o/perl6-green
…/green :21:
my Proc::Async $proc .=new('perl6', '-Iblib', '-Ilib', $file.IO.absolute);
tony-o/perl6-hiker
…/01-app.t :20:
my IO::Socket::INET $client .=new(:host<127.0.0.1>, :port(8666));
tony-o/perl6-html-parser-xml
…/S05.html :10419:
<pre> $str.=trans( %mapping.pairs );</pre>
tony-o/perl6-html-parser-xml
…/S05.html :10440:
<pre> $str.=trans( &#39;A..C&#39; =&#62; &#39;a..c&#39;, &#39;XYZ&#39; =&#62; &#39;xyz&#39; );</pre>
tony-o/perl6-html-parser-xml
…/S05.html :10478:
<pre> $str.=trans( [&#39;A&#39;..&#39;C&#39;] =&#62; [&#39;a&#39;..&#39;c&#39;], &#60;X Y Z&#62; =&#62; &#60;x y z&#62; );</pre>
tony-o/perl6-http-server-logger
…/Logger.pm6 :70:
$str .=subst($/.Str, %.custom{$code} ~~ Sub ?? %.custom{$code}($d) !! $d // '-');
tony-o/perl6-http-server-middleware-json
…/00-basic.t :31:
my IO::Socket::INET $client .=new(:host<127.0.0.1>, :port(1666));
tony-o/perl6-http-server-router-yaml
…/00-basic.t :15:
my IO::Socket::INET $client .=new(:host<127.0.0.1>, :port(1666));
tony-o/perl6-http-server-router
…/01-routes.t :35:
my IO::Socket::INET $client .=new(:host<127.0.0.1>, :port(1666));
tony-o/perl6-template-protone
…/Protone.pm6 :24:
$template .=substr($to + $.close.chars);
ufobat/perl6-Temp-Path
…/Path.pm6 :27:
$p .= resolve unless $*DISTRO.is-win;
ugexe/zef
…/CLI.pm6 :116:
@wants .= map: *.&str2identity;
ugexe/zef
…/Ecosystems.pm6 :47:
$saved-as .= child("{$!name}.json") if $saved-as.d;
zengargoyle/Text-Fortune
…/Fortune.pm6 :218:
$fortune .= trans( 'n..za..mN..ZA..M' => 'a..zA..Z' );
zengargoyle/p6-Algorithm-Trie-libdatrie
…/README.md :13:
my Trie $t .= new: 'a'..'z', 'A'..'Z';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/README.md :63:
my Trie $t .= new: 'a'..'z', 'A'..'Z', '0'..'9';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/libdatrie.pm6 :13:
my Trie $t .= new: 'a'..'z', 'A'..'Z';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/libdatrie.pm6 :72:
my Trie $t .= new: 'a'..'z', 'A'..'Z', '0'..'9';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/02-trie.t :13:
$t .= new: 'a'..'z';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/03-trie_iterator.t :16:
$t .= new: 'a'..'z';
zengargoyle/p6-Algorithm-Trie-libdatrie
…/04-trie_state.t :13:
$t .= new: 'a'..'z';
zoffixznet/perl6-Color
…/Color.pm6 :124:
my Color $c .= new( hsl => [lighten( |self.hsl, $Δ )]);
zoffixznet/perl6-Color
…/Color.pm6 :131:
my Color $c .= new( hsl => [saturate( |self.hsl, $Δ )]);
zoffixznet/perl6-Color
…/Color.pm6 :137:
my Color $c .= new( 255-$.r, 255-$.g, 255-$.b );
zoffixznet/perl6-Color
…/Color.pm6 :144:
my Color $c .= new( |rotate( $.r, $.g, $.b, $α ) );
zoffixznet/perl6-CoreHackers-Sourcery
…/Sourcery.pm6 :9:
$v .= subst: '.', '', :g if $v.contains: '.g';
zoffixznet/perl6-GlotIO
…/glot.p6 :4:
my GlotIO $glot .= new: key => 't/key'.IO.lines[0];
zoffixznet/perl6-GlotIO
…/01-run-api.t :6:
my GlotIO $glot .= new: key => 't/key'.IO.lines[0];
zoffixznet/perl6-GlotIO
…/02-snippets-api.t :6:
my GlotIO $glot .= new: key => 't/key'.IO.lines[0];
zoffixznet/perl6-Proc-Q
…/01-basic.t :32:
@res .= sort: *.tag;
zoffixznet/perl6-Reminders
…/README.md :12:
my Reminders $rem .= new; # use default 'reminders.sqlite.db' db file
zoffixznet/perl6-Reminders
…/README.md :106:
my Reminders $rem-custom .= new: :db-file<my-special-reminders.db>;
zostay/HTTP-Supply
…/Body.pm6 :81:
$str-size .= subst(/';' .*/, '');
orangebot/p6-Git-Wrapper
…/Parser.pm6 :55:
$isodate.=subst(' ', 'T', :n(1)).=subst(' ', '');
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment