greppable6

query

my\s*\(

result.md

File	Code
ALOREN/App-FindSource …/fs :115:	my (@t1, @t2);
ALOREN/App-FindSource …/fs :117:	my ($debug, $only, $ignore-case) = ($os<d>, $os<only>, $os<i>);
ALOREN/Getopt-Advance …/Advance.adoc :188:	my ($optset, $option, $v) = @(v);
ALOREN/Getopt-Advance …/Advance.adoc :289:	my ($optset, $no, $v) = @(v);
ALOREN/Getopt-Advance …/Helper.pm6 :44:	my ($usage, %optionref) = ("", %!option);
ALOREN/Getopt-Advance …/Helper.pm6 :105:	my ($front, @pos);
ALOREN/Getopt-Advance …/Helper.pm6 :128:	my (@front, @pos);
ALOREN/Getopt-Advance …/Helper.pm6 :235:	my ($cmd, $pos, $opt) = (+@cmdu, +@posu, +@annotation);
ALOREN/Getopt-Advance …/Helper.pm6 :263:	my ($cmd, $pos, $opt) = (0, 0, 0);
ALOREN/Getopt-Advance …/Parser.pm6 :394:	my (%order, @sorted);
ALOREN/Getopt-Advance …/Parser.pm6 :644:	my ($matched, $skip) = (True, False);
ALOREN/Getopt-Advance …/Utils.pm6 :91:	my ($matched, $skip) = (True, False);
ALOREN/Getopt-Advance …/Utils.pm6 :182:	my ($f, $s) = ($optset.has(.[0], 'b'), $optset.has(.[1], 'b'));
ALOREN/Getopt-Advance …/create-symbol-directory.p6 :71:	my ($dir, $out) = ($dira.value.IO, $os<output>.IO);
ALOREN/Getopt-Advance …/fetch-picture.p6 :142:	my ($cmd, $file) = ("", "{opts<o>.IO.absolute}/{dir}/{count}.{opts<e>}");
ALOREN/Getopt-Advance …/fetch-picture.p6 :163:	my ($dir, $content, $npage, $beg, $end, $count);
ALOREN/Getopt-Advance …/make-cpan-pack.p6 :56:	my ($ver, $debug) = ($os<ver> // "", $os<debug>);
ALOREN/Getopt-Advance …/make-cpan-pack.p6 :58:	my ($in, $out) = ($dir.value.IO, ($os<out> // "").IO);
ALOREN/Getopt-Advance …/make-cpan-pack.p6 :77:	my ($name, $version) = (%meta<name>, %meta<version>);
ALOREN/Getopt-Advance …/xcp.p6 :28:	my ($src, $dst) = (~$0, ~$1);
ALOREN/Getopt-Advance …/xcp.p6 :29:	my ($ss, $ds, $bds) = (getFileSize($src), 1, 0);
ALOREN/Getopt-Advance …/02-option.t :50:	my ($os, $opt, $v) = @$_;
ALOREN/Getopt-Advance …/02-option.t :60:	my ($, $, $v) = @$_;
ALOREN/Getopt-Advance …/03-types.t :233:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/03-types.t :257:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/03-types.t :276:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/03-types.t :297:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/03-types.t :325:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/03-types.t :344:	my ($shoptname, $lgoptname) = ('a', "action");
ALOREN/Getopt-Advance …/05-main.t :16:	my ($os, $main, @v) := @$v;
ALOREN/Getopt-Advance …/07-pos.t :114:	my ($os, $pos, $v) = @(v);
ALOREN/Terminal-Table …/README.adoc :211:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
ALOREN/Terminal-Table …/README.adoc :212:	my ($rx, $ry) = ($x * 2, $y * 2);
ALOREN/Terminal-Table …/README.zh.adoc :169:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
ALOREN/Terminal-Table …/README.zh.adoc :170:	my ($rx, $ry) = ($x * 2, $y * 2);
ALOREN/Terminal-Table …/LightWrap.pm6 :57:	my ($key, $value) = ($/.Str, noexpand-width($/.Str));
ALOREN/Terminal-Table …/irregular-shape.p6 :16:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
ALOREN/Terminal-Table …/irregular-shape.p6 :17:	my ($rx, $ry) = ($x * 2, $y * 2);
ALOREN/Terminal-Table …/irregular-shape.p6 :56:	my ($x, $y) = ((rand * 100).floor % 4, (rand * 100).floor % 6);
ALOREN/Terminal-Table …/04-style.t :10:	my (@all-corner, @all-lines);
ASTJ/SQL-NamedPlaceholder …/README.md :13:	my ($sql, $bind) = bind-named(q[
ASTJ/SQL-NamedPlaceholder …/NamedPlaceholder.pm6 :32:	my ($sql, $bind) = bind-named(q[
ASTJ/SQL-NamedPlaceholder …/01-basic.t :6:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => 3, limit => 5 });
ASTJ/SQL-NamedPlaceholder …/02-extend.t :8:	my ($sql, $bind) = bind-named(qq:to/EOQ/, { blog_id => 3, limit => 5 });
ASTJ/SQL-NamedPlaceholder …/03-array.t :7:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => [1,2,3] });
ASTJ/SQL-NamedPlaceholder …/03-array.t :23:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => [Nil] });
ASTJ/SQL-NamedPlaceholder …/04-name-id.t :6:	my ($sql, $bind) = bind-named(q{ UPDATE foo SET a = '2016-02-02 00:00:00' }, { });
ASTJ/SQL-NamedPlaceholder …/06-hyphen.t :6:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog-status => 1, blog_id => 3, limit => 5 });
ATROXAPER/Propius …/time-based-00-simple.t :31:	my ($r-key, $r-value, $r-cause, $removal-call);
AZAWAWI/App-Perl6LangServer …/Perl6LangServer.pm6 :34:	my ($name, $value) = $line.split(': ');
AZAWAWI/App-Perl6LangServer …/Perl6LangServer.pm6 :165:	my ($file-name,$file-handle) = tempfile(:!unlink);
AZAWAWI/App-Perl6LangServer …/test-ast.p6 :34:	my (Int $indent, $rule, $value);
AZAWAWI/MsgPack …/Unpacker.pm6 :41:	my ($buffer, $len) = ($sbuf.data, $sbuf.size);
AZAWAWI/MsgPack …/Unpacker.pm6 :122:	my ($key, $val);
AZAWAWI/SDL2 …/shooter.p6 :61:	my ($x, $y) = ^W .pick, ^H .pick;
AZAWAWI/Wkhtmltox …/test-version.p6 :9:	my ($major, $minor, $patch) = (~$/[0], ~$/[1], ~$/[2]);
AZAWAWI/Wkhtmltox …/test-version.p6 :17:	my ($major, $minor, $patch) = wkhtmltopdf.version;
BDUGGAN/Crypt-RSA …/README.md :12:	my ($public,$private) = $crypt.generate-keys;
BDUGGAN/Crypt-RSA …/02-roundtrip.t :9:	my ($pub,$pri) = $crypt.generate-keys;
BDUGGAN/Crypt-RSA …/04-crypt-random.t :28:	my ($pub,$pri) = $crypt.generate-keys;
BDUGGAN/Crypt-RSA …/06-digits.t :9:	my ($pub,$pri) = $crypt.generate-keys(400);
CHSANCH/Lingua-Stem-Es …/stem-list.t :12:	my ( $word, $stem ) = $line.words;
COKE/App-Unicode-Mangle …/Mangle.pm6 :3:	my (%hacks, %posts);
CTILMES/LibCurl …/Easy.pm6 :438:	my ($code, $type) = %opts{$option};
CTILMES/LibCurl …/Easy.pm6 :546:	my ($code, $codelength) = %formfields{$field};
CTILMES/LibCurl …/Easy.pm6 :617:	my ($code, $type) = %infofields{$info};
CTILMES/LibCurl …/Multi.pm6 :39:	my ($code, $type) = %opts{$option};
CTILMES/LibGit2 …/03-config.t :5:	my ($config_file, $filehandle) = tempfile;
DARRENF/Test-Declare …/Declare.pm6 :198:	my ($stdout, $stderr, $stdin) = capture {
ELIZABETH/Env …/README.md :56:	my (:$PATH, :$SHELL, *%) := %*ENV;
ELIZABETH/Env …/Env.pm6 :148:	my (:$PATH, :$SHELL, *%) := %*ENV;
ELIZABETH/List-MoreUtils …/README.md :912:	my ($min,$max) = minmax (43,66,77,23,780); # (23,780)
ELIZABETH/List-MoreUtils …/README.md :923:	my ($min,$max) = minmaxstr <foo bar baz zippo>; # <bar zippo>
ELIZABETH/List-MoreUtils …/MoreUtils.pm6 :1544:	my ($min,$max) = minmax (43,66,77,23,780); # (23,780)
ELIZABETH/List-MoreUtils …/MoreUtils.pm6 :1557:	my ($min,$max) = minmaxstr <foo bar baz zippo>; # <bar zippo>
ELIZABETH/List-Util …/README.md :251:	my ( $key, $value ) = @$pair;
ELIZABETH/List-Util …/README.md :322:	my ( $key, $val ) = pairfirst -> $a, $b { BLOCK }, @kvlist;
ELIZABETH/List-Util …/Util.pm6 :481:	my ( $key, $value ) = @$pair;
ELIZABETH/List-Util …/Util.pm6 :561:	my ( $key, $val ) = pairfirst -> $a, $b { BLOCK }, @kvlist;
ELIZABETH/List-UtilsBy …/README.md :130:	my ($minimal, $maximal) = minmax_by { KEYFUNC }, @values;
ELIZABETH/List-UtilsBy …/README.md :136:	my ($smallest,$tallest) = @people.minmax: *.height;
ELIZABETH/List-UtilsBy …/README.md :223:	my (@arr0, @arr1, @arr2, ...) = unzip_by { ITEMFUNC }, @vals
ELIZABETH/List-UtilsBy …/README.md :227:	my (@firstnames, @lastnames) = unzip_by { .split(" ",2) }, @names;
ELIZABETH/List-UtilsBy …/UtilsBy.pm6 :338:	my ($minimal, $maximal) = minmax_by { KEYFUNC }, @values;
ELIZABETH/List-UtilsBy …/UtilsBy.pm6 :347:	my ($smallest,$tallest) = @people.minmax: *.height;
ELIZABETH/List-UtilsBy …/UtilsBy.pm6 :448:	my (@arr0, @arr1, @arr2, ...) = unzip_by { ITEMFUNC }, @vals
ELIZABETH/List-UtilsBy …/UtilsBy.pm6 :457:	my (@firstnames, @lastnames) = unzip_by { .split(" ",2) }, @names;
ELIZABETH/P5localtime …/README.md :14:	my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
ELIZABETH/P5localtime …/README.md :17:	my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) = gmtime(time);
ELIZABETH/P5localtime …/P5localtime.pm6 :77:	my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
ELIZABETH/P5localtime …/P5localtime.pm6 :80:	my ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday) = gmtime(time);
ELIZABETH/P5pack …/README.md :629:	my($what,$where,$howmuch) = @_;
ELIZABETH/P5pack …/P5pack.pm6 :1032:	my($what,$where,$howmuch) = @_;
ELIZABETH/P5quotemeta …/char-finder.pl :16:	my ( $s, $e ) = @$_;
ELIZABETH/P5times …/01-basic.t :14:	my ($user1,$system1,$cuser1,$csystem1) = times;
ELIZABETH/P5times …/01-basic.t :23:	my ($user2,$system2,$cuser2,$csystem2) = times;
FCO/Red …/CommonSQL.pm6 :123:	my ( :$key, :$value ) = self.translate($ast);
FCO/Red …/CommonSQL.pm6 :133:	my ($s, @b) := do given self.translate: (.column but role :: { method class { $class } }), "select" { .key, .value }
FCO/Red …/CommonSQL.pm6 :139:	my ($s, @b) := do given self.translate: $_, "select" { .key, .value }
FCO/Red …/CommonSQL.pm6 :152:	my ($where, @wb) := do given self.translate: $ast.filter, "where" { .key, .value } if $ast.?filter;
FCO/Red …/CommonSQL.pm6 :155:	my ($s, @b) := do given self.translate: $_, "order" { .key, .value }
FCO/Red …/CommonSQL.pm6 :168:	my ($s, @b) := do given self.translate: $_, "group-by" { .key, .value };
FCO/Red …/CommonSQL.pm6 :197:	my ($s, @b) := do given self.translate: $_ { .key, .value }
FCO/Red …/CommonSQL.pm6 :204:	my ($str, @bind) := do given self.translate: .col, "is defined" { .key, .value }
FCO/Red …/CommonSQL.pm6 :213:	my ($s, @b) := do given self.translate: $_, "case" { .key, .value }
FCO/Red …/CommonSQL.pm6 :221:	my ($s, @b) := do given self.translate: .key, "when" { .key, .value }
FCO/Red …/CommonSQL.pm6 :225:	my ($s, @b) := do given self.translate: .value, "then" { .key, .value }
FCO/Red …/CommonSQL.pm6 :233:	my ($s, @b) := do given self.translate: $_, "then" { .key, .value }
FCO/Red …/CommonSQL.pm6 :244:	my ($lstr, @lbind) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :245:	my ($rstr, @rbind) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :251:	my ($rstr, @rbind) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :257:	my ($lstr, @lbind) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :263:	my ($l, @lbind) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :264:	my ($r, @rbind) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :269:	my ($l, @lbind) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :270:	my ($r, @rbind) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :275:	my ($str, @bind) := do given self.translate: .value.col, "is defined" { .key, .value }
FCO/Red …/CommonSQL.pm6 :280:	my ($str, @bind) := do given self.translate: .value, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :289:	my ($l, @lb) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :290:	my ($r, @rb) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :295:	my ($l, @lbind) := do given self.translate: .left, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :296:	my ($r, @rbind) := do given self.translate: .right, $context { .key, .value }
FCO/Red …/CommonSQL.pm6 :301:	my ($str, @bind) := do with $col.computation {
FCO/Red …/CommonSQL.pm6 :331:	my ( :$key, :$value ) = self.translate(.value, $context );
FCO/Red …/CommonSQL.pm6 :455:	my ($wstr, @wbind) := do given self.translate(.filter) { .key, .value }
FCO/Red …/CommonSQL.pm6 :458:	my ($s, @b) := do given self.translate: $val, 'update' { .key, .value }
FCO/Red …/Mock.pm6 :88:	my ($sql, @bind) := do given data { .key, .value }
FCO/Red …/Pg.pm6 :55:	my ($ls, @lb) := self.translate: .left, $context;
FCO/Red …/Pg.pm6 :56:	my ($rs, @rb) := self.translate: .right, $context;
FCO/Red …/Pg.pm6 :92:	my ($sql, @bind) := do given data { .key, .value }
FCO/Red …/SQLite.pm6 :39:	my ($sql, @bind) := do given data { .key, .value }
FCO/Red …/SQLite.pm6 :64:	my ($val, @bind) := do given self.translate: .value, $context { .key, .value }
FCO/Red …/SQLite.pm6 :69:	my ($val, @bind) := do given self.translate: .value, $context { .key, .value }
FCO/Red …/SQLite.pm6 :74:	my ($val, @bind) := do given self.translate: .value, $context { .key, .value }
FCO/Red …/SQLite.pm6 :79:	my ($val, @bind) := do given self.translate: .value, $context { .key, .value }
FCO/Red …/Iterator.pm6 :12:	my ($sql, @bind) := do given $!driver.translate: $ast { .key, .value }
FRITH/Image-Libexif …/raw-taginfo.p6 :14:	my ($desc, $prev);
FRITH/Image-Libexif …/Libexif.pm6 :219:	my ($desc, $prev);
FRITH/Math-FFT-Libfftw3 …/MathMatrix.p6 :9:	my ($rows, $cols) = $matrix.size;
HANENKAMP/ArrayHash …/array-hash.t :11:	my ($b, %hash, @array);
HANENKAMP/ArrayHash …/multi-hash.t :11:	my ($b, %hash, @array);
HANENKAMP/Cofra …/IOC.pm6 :51:	my (@list, %hash);
HANENKAMP/DOM-Tiny …/CSS.pm6 :365:	my ($coeff, $offset) = |$<equation>.made;
HANENKAMP/DOM-Tiny …/HTML.pm6 :436:	my ($allowed, $scope) = |$close;
HANENKAMP/DateTime-DST …/DST.pm6 :12:	my ($posix, $leap-sec) = $time.to-posix;
HANENKAMP/Email-Address …/README.md :137:	my ($local-part, $domain) = Email::Address.split("foo@example.com");
HANENKAMP/Email-Address …/Address.pm6 :110:	my ($display-name, @mailboxes) = .kv;
HANENKAMP/Email-Address …/Address.pm6 :273:	my ($local-part, $domain) = Email::Address.split("foo@example.com");
HANENKAMP/Future …/Future.pm6 :17:	my (:$tried-sig, :@found-sigs) := sigs(:$!tried, :@!found);
HANENKAMP/Future …/Future.pm6 :29:	my (:$tried-sig, :@found-sigs) := sigs(:$!tried, :@!found);
HANENKAMP/Getopt-ForClass …/ForClass.pm6 :5:	my (@pos, %names);
HANENKAMP/Getopt-ForClass …/ForClass.pm6 :156:	my (@common-pos, @common-named);
HANENKAMP/HTTP-Headers …/Headers.pm6 :97:	my ($key, $value) = $pair.split('=', 2);
HANENKAMP/HTTP-Headers …/Headers.pm6 :110:	my ($key, $value) = .split('=', 2);
HANENKAMP/HTTP-Headers …/headers.t :8:	my (HTTP::Headers $h, HTTP::Headers $h2);
HANENKAMP/HTTP-Request-Supply …/Body.pm6 :157:	my ($name, $value) = $line.split(": ");
HANENKAMP/HTTP-Request-Supply …/Request.pm6 :236:	my ($method, $uri, $http-version, @error) = $line.split(' ', 3);
HANENKAMP/HTTP-Request-Supply …/Request.pm6 :384:	my ($name, $value) = $line.split(": ");
HANENKAMP/HTTP-Request-Supply …/Response.pm6 :200:	my ($http-version, $status-code, $status-message) = $line.split(' ', 3);
HANENKAMP/HTTP-Request-Supply …/Response.pm6 :340:	my ($name, $value) = $line.split(": ");
HANENKAMP/HTTP-Supply …/Body.pm6 :157:	my ($name, $value) = $line.split(": ");
HANENKAMP/HTTP-Supply …/Request.pm6 :236:	my ($method, $uri, $http-version, @error) = $line.split(' ', 3);
HANENKAMP/HTTP-Supply …/Request.pm6 :384:	my ($name, $value) = $line.split(": ");
HANENKAMP/HTTP-Supply …/Response.pm6 :200:	my ($http-version, $status-code, $status-message) = $line.split(' ', 3);
HANENKAMP/HTTP-Supply …/Response.pm6 :340:	my ($name, $value) = $line.split(": ");
HANENKAMP/Hash-MultiValue …/MultiValue.pm6 :397:	my ($previous, Bool $has-previous);
HANENKAMP/Hash-MultiValue …/basic.t :25:	my ($name, &construct) = $test.kv;
HANENKAMP/Hash-MultiValue …/custom-mixed.t :18:	my ($name, &construct) = $test.kv;
HANENKAMP/IO-Glob …/Glob.pm6 :383:	my (:$path, :@globbers, :$origin) := @open-list.shift;
HANENKAMP/IO-Glob …/Glob.pm6 :386:	my ($globber, @remaining) = @globbers;
HANENKAMP/ModelDB …/ModelBuilder.pm6 :108:	# my ($index-name, $pos) = |@indexed;
HANENKAMP/ModelDB …/ModelBuilder.pm6 :121:	# my ($relationship-name, $schema-ref) = |@related;
HANENKAMP/ModelDB …/Table.pm6 :204:	my ($where, @bindings) = self.process-where(%keys);
HANENKAMP/ModelDB …/Table.pm6 :261:	my ($where, @where-bindings) = self.process-where({
HANENKAMP/ModelDB …/Table.pm6 :286:	my ($where, @bindings) = self.process-where(%where);
HANENKAMP/ModelDB …/Table.pm6 :309:	my ($where, @bindings) = $.table.process-where(%.search);
HANENKAMP/Path-Router …/Router.pm6 :74:	my (Str $path, Path::Router $router) = $pair.kv;
HANENKAMP/Path-Router …/Router.pm6 :250:	my ($route, $path) = @($possible);
HANENKAMP/Path-Router …/Router.pm6 :13:	my ($passed, $reason);
HANENKAMP/Path-Router …/014_test_path_router.t :127:	my ($output, $error) = init-io;
HANENKAMP/Smack …/Smack.pm6 :163:	my (Int() $status, List() $headers, Supply() $body) := $promise.result;
HANENKAMP/Smack …/Cascade.pm6 :12:	my (Int() $code) = $p.result;
HANENKAMP/Smack …/File.pm6 :30:	my ($file, $path-info) = $.file // self.locate-file(%env);
HANENKAMP/Smack …/File.pm6 :70:	my ($file, @path-info);
HANENKAMP/Smack …/CGI.pm6 :43:	my (Int(Any) $status, $headers, Supply(Any) $body) = $p.result;
HANENKAMP/Smack …/Request.pm6 :61:	my ($key, $value) = .split(/ '=' /, 2).map({ uri-unescape( .subst(/ '+' /, ' ', :g)) });
HANENKAMP/Smack …/URI.pm6 :325:	my ($k, $v) = .split('=', 2).map(&uri-unescape);
HANENKAMP/Smack …/Util.pm6 :69:	my ($k, $v) = $p.kv;
HANENKAMP/Smack …/Util.pm6 :124:	my ($s, $h) = |$then.result;
HANENKAMP/Template-Anti …/Anti.pm6 :483:	my ($view, $method) = $template.split: '.', 2;
HANENKAMP/Template-Anti …/Anti.pm6 :521:	my ($format, $source-file);
HANENKAMP/ULID …/ULID.pm6 :48:	my ($mss, $msm, $lss, $lsm) = @bitmasks[ $segment++ % @bitmasking ];
HANENKAMP/ULID …/ULID.pm6 :80:	my ($unix-secs) = $now.to-posix;
HMBRAND/Text-CSV …/090-hooks.txt :6:	my ($c, $av) = @_;
HMBRAND/Text-CSV …/090-hooks.txt :11:	my ($c, $av) = @_;
HMBRAND/Text-CSV …/bugs.pl :30:	my ($class, $t, $rt) = @_;
HMBRAND/Text-CSV …/bugs.pl :40:	my ($re, $p, @arg) = @_;
HMBRAND/Text-CSV …/CSV.pod6 :2192:	my ($c, $s);
HMBRAND/Text-CSV …/79_callbacks.t :170:	my ($c, $av) = @_;
HMBRAND/Text-CSV …/79_callbacks.t :175:	my ($c, $av) = @_;
HMBRAND/Text-CSV …/time-twice.pl :31:	my ($s, $t) = m/^(.+?)\s+([0-9][.0-9]+)$/ or next;
HMBRAND/Text-CSV …/time.pl :116:	my ($v, $script, $file, @args) = @_;
HMBRAND/Text-CSV …/time.pl :117:	my ($ext, $exe, @arg) = @{$lang{$v}};
HMBRAND/Text-CSV …/time.pl :142:	my ($v, $irc, $script, $modules, @args) = @$_;
HMBRAND/Text-CSV …/time.pl :148:	my ($ext, $exe, @arg) = @{$lang{$v}};
HMBRAND/Text-CSV …/time.pl :175:	my ($run, $i) = runfrom ($v, $rs, $fn, @args);
HMBRAND/Text-CSV …/time.pl :238:	my ($script, $s_script, $i, $run, $start, $exe, $modules, @args) = @$_;
HMBRAND/Text-CSV …/time.pl :243:	my ($s_run, $s_run2, $s_runn) = map { $i eq "FAIL"
JDV/Data-Selector …/Selector.pm :384:	my ( $selector_tree, $data_tree, ) = @( shift @queue );
JDV/Data-Selector …/Selector.pm :464:	my ( %arrays_to_be_trimmed, %deferred_excludes, %matched_includes, );
JDV/Data-Selector …/02-parse_string.t :308:	my ( $selector_string, $selector_tree_expected, $elasped_expected, ) =
JDV/Data-Selector …/03-apply_tree.t :177:	my ( $selector, $data_tree_expected, $elasped_expected, ) = @($_);
JGOFF/Perl6-Parser …/999-regression.t :143:	my ($x,@x);
JGOFF/Perl6-Parser …/999-regression.t :156:	my ($n,$k);
JGOFF/Perl6-Parser …/999-regression.t :157:	loop (my ($p, $f) = 2, 0; $f < $k && $p*$p <= $n; $p++) { }
JGOFF/Perl6-Parser …/999-regression.t :193:	my (@a,@b);
JGOFF/Perl6-Parser …/rosetta-1.t :89:	my ($yd, $ym, $xd, $xm) = ($y div n, $y mod n, $x div n, $x mod n);
JGOFF/Perl6-Parser …/rosetta-1.t :260:	my ( $x, $y ) = @empties.roll;
JGOFF/Perl6-Parser …/rosetta-a.t :27:	my ($a, $b) = $*IN.get.split(" ");
JGOFF/Perl6-Parser …/rosetta-a.t :350:	loop (my ($p, $f) = 2, 0; $f < $k && $p*$p <= $n; $p++) {
JGOFF/Perl6-Parser …/rosetta-a.t :451:	:my ($a,$b,$c,$d);
JGOFF/Perl6-Parser …/rosetta-a.t :576:	# my ($w, $h) = (400, 400);
JGOFF/Perl6-Parser …/rosetta-a.t :691:	my ($enc, $pow, %freq) = arithmethic_coding($str, $radix);
JGOFF/Perl6-Parser …/rosetta-a.t :1021:	my ($mag,$ang) = $c.polar;
JGOFF/Perl6-Parser …/rosetta-b.t :179:	my ($b,$a) = sort +*.coeff, $x, $y;
JGOFF/Perl6-Parser …/rosetta-b.t :214:	my ($w, $h) = (640, 640);
JGOFF/Perl6-Parser …/rosetta-b.t :218:	my ($x, $y) = (0, 0);
JGOFF/Perl6-Parser …/rosetta-b.t :642:	my ($x, $y) = 0, $r;
JGOFF/Perl6-Parser …/rosetta-b.t :942:	my ($bulls, $cows) = 0, 0;
JGOFF/Perl6-Parser …/rosetta-b.t :963:	my ($bulls, $cows) = read-score;
JGOFF/Perl6-Tidy …/02-indent.t :8:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :399:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :729:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :1059:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :1389:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :1712:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :2021:	my ( $source, $tidied );
JGOFF/Perl6-Tidy …/02-indent.t :2337:	my ( $source, $tidied );
JGOFF/Readline …/02-base.t :104:	my ( $rows, $cols ) = ( 80, 24 );
JGOFF/Readline …/02-base.t :116:	my ( $start, $end ) = ( 1, 2 );
JGOFF/Readline …/02-base.t :216:	my ( $from, $to ) = ( 1, 2 );
JGOFF/Readline …/02-base.t :347:	my ( $start, $end ) = ( 1, 2 );
JGOFF/Vroom-Reveal …/Reveal.pm :97:	my ($title) = $vroom-text ~~ m{ title\: (.+?) $$ };
JMASLAK/IP-Random …/Random.pm6 :62:	my ($ipv4, $mask) = ipv4-cidr-to-int($ex);
JMASLAK/IP-Random …/Random.pm6 :70:	my ($ipv4, $mask) = ipv4-cidr-to-int($potential.key);
JMASLAK/IP-Random …/Random.pm6 :214:	my ($exclude_ip, $exclude_mask) = $ascii.split('/');
JNTHN/Cro-Core …/Cro.pm6 :141:	my ($source, @rest) = @!components;
JNTHN/Cro-HTTP-Test …/Test.pm6 :44:	my ($client, $service) = build-client-and-service($testee, %client-options,
JNTHN/Cro-HTTP …/Basic.pm6 :25:	my ($user, $pass) = decode-base64($auth, :bin).decode.split(':');
JNTHN/Cro-HTTP …/BodyParsers.pm6 :172:	my ($header, $body-str) = $part.split("\r\n\r\n", 2);
JNTHN/Cro-HTTP …/Cookie.pm6 :50:	my ($name, $value) = $<cookie-pair>.made;
JNTHN/Cro-HTTP …/Request.pm6 :130:	my ($name, $value) = $_.split('=');
JNTHN/Cro-HTTP …/Router.pm6 :221:	my ($handler-idx, $args) = .ast;
JNTHN/Cro-HTTP …/Router.pm6 :360:	my (:@positional, :@named) := $signature.params.classify:
JNTHN/Cro-HTTP …/Router.pm6 :472:	my ($exists, $lookup) = do given $param {
JNTHN/Cro-HTTP …/Router.pm6 :630:	my ($prefix, $routes) = .kv;
JNTHN/Cro-HTTP …/Router.pm6 :668:	my ($prefix, $transform) = .kv;
JNTHN/Cro-HTTP …/FrameParser.pm6 :27:	my ($type, $flags, $sid);
JNTHN/Cro-HTTP …/FrameParser.pm6 :130:	my ($dependency, $weight, $headers, $exclusive);
JNTHN/Cro-HTTP …/FrameParser.pm6 :182:	my ($promised-sid, $headers);
JNTHN/Cro-HTTP …/FrameParser.pm6 :198:	my ($last-sid, $error-code, $debug);
JNTHN/Cro-HTTP …/GeneralParser.pm6 :28:	my ($breakable, $break) = (True, $curr-sid);
JNTHN/Cro-HTTP …/http-request-parser.t :18:	my ($headers, $body) = $req.split(/\n\n/, 2);
JNTHN/Cro-HTTP …/http-request-serializer.t :17:	my ($header, $body) = $expected-output.split("\n\n", 2);
JNTHN/Cro-HTTP …/http-response-parser.t :16:	my ($headers, $body) = $res.split(/\n\n/, 2);
JNTHN/Cro-HTTP …/http-response-serializer.t :12:	my ($header, $body) = $expected-output.split("\n\n", 2);
JNTHN/Cro-HTTP …/http-session-inmemory.t :51:	my ($res-a, $res-b) = await do for $client-a, $client-b -> $client {
JNTHN/Cro-HTTP …/http-session-persistent.t :100:	my ($res-a, $res-b) = await do for $client-a, $client-b -> $client {
JNTHN/Cro-HTTP …/http2-request-parser.t :8:	my ($buf, @headers);
JNTHN/Cro-HTTP …/http2-request-serializer.t :8:	my ($req, @headers, $body);
JNTHN/Cro-HTTP …/http2-response-parser.t :7:	my ($buf, @headers);
JNTHN/Cro-HTTP …/http2-response-parser.t :10:	my ($ping, $settings);
JNTHN/Cro-HTTP …/http2-response-serializer.t :8:	my ($resp, @headers, $body);
JNTHN/Cro-OpenAPI-RoutesFromDefinition …/RoutesFromDefinition.pm6 :77:	my (:@pos, :@named) := &!implementation.signature.params.classify({ .named ?? 'named' !! 'pos' });
JNTHN/Cro-OpenAPI-RoutesFromDefinition …/RoutesFromDefinition.pm6 :511:	my ($json, $yaml);
JNTHN/Cro-ZeroMQ …/Internal.pm6 :80:	my ($ctx, $socket) = self!initial;
JNTHN/Cro-ZeroMQ …/Internal.pm6 :130:	my ($ictx, $isocket) = $socket ?? ($ctx, $socket) !! self!initial;
JNTHN/Cro-ZeroMQ …/Sub.pm6 :19:	my ($ctx, $socket) = self!initial;
JNTHN/IO-Socket-Async-SSL …/SSL.pm6 :400:	my ($have-cert, $have-pkey);
JNTHN/IO-Socket-Async-SSL …/SSL.pm6 :735:	my ($name-wild, $rest-name) = $name.split('.', 2);
JNTHN/IO-Socket-Async-SSL …/SSL.pm6 :736:	my ($host-wild, $rest-host) = $host.split('.', 2);
JNTHN/IO-Socket-Async-SSL …/bad-incoming.t :12:	my ($conns, $quits) = 0, 0;
JNTHN/JSON-Path …/Path.pm6 :165:	my ($from, $to) = (+$<n1>, $<n2> ?? +$<n2> !! Inf);
JNTHN/OpenAPI-Model …/Element.pm6 :115:	my ($ext, $rel) = .split('#');
JNTHN/POFile …/POFile.pm6 :93:	my ($reference = '', $extracted = '', $comment = '',
JNTHN/POFile …/POFile.pm6 :295:	my (@items, %entries);
JNTHN/POFile …/01-basic.t :5:	my ($PO, $result);
JNTHN/POFile …/02-deletion.t :5:	my ($PO, $result);
JNTHN/cro …/CLI.pm6 :14:	my ($host, $port) = parse-host-port($host-port);
JNTHN/cro …/CLI.pm6 :29:	my (@generated-links, @links);
JNTHN/cro …/CLI.pm6 :311:	my ($host, $port) = parse-host-port($host-port);
JNTHN/cro …/CLI.pm6 :324:	my ($host, $port);
JNTHN/cro …/Editor.pm6 :7:	my ($path, $from, $to, $endpoint);
JNTHN/cro …/Editor.pm6 :49:	my ($path, $from, $to, $endpoint) = check-services($from-service,
JNTHN/cro …/Editor.pm6 :70:	my ($path, $from, $to, $endpoint) = check-services($from-service,
JNTHN/cro …/Editor.pm6 :103:	my ($path, $from, $to, $ep) = check-services($from-service,
JNTHN/cro …/Editor.pm6 :113:	my (@inner, @outer);
JNTHN/cro …/LinkTemplate.pm6 :29:	my ($service, $endp) = $link.split(':');
JNTHN/cro …/Runner.pm6 :149:	my ($proc, %env) = service-proc($cro-file, %endpoint-ports);
JNTHN/cro …/Web.pm6 :78:	my (@generated-links, @links);
JNTHN/cro …/Web.pm6 :163:	my (@nodes, @links);
JNTHN/cro …/app.js :27322:	function ComponentDummy() {}
JNTHN/cro …/app.js :27324:	ReactPureComponent.prototype = new ComponentDummy();
JNTHN/cro …/app.js :42263:	function forEachSingleChildDummy(traverseContext, child, name) {
JSTOWE/Audio-Convert-Samplerate …/020-process.t :39:	my ($in-frames, $num-frames) = $in-obj.read-float($bufsize, :raw).list;
JSTOWE/Audio-Convert-Samplerate …/020-process.t :65:	my ($in-frames, $num-frames) = $in-obj.read-short($bufsize, :raw).list;
JSTOWE/Audio-Convert-Samplerate …/020-process.t :91:	my ($in-frames, $num-frames) = $in-obj.read-int($bufsize, :raw).list;
JSTOWE/Audio-Encode-LameMP3 …/p6lame_encode :25:	my ($in-frames, $num-frames) = $sndfile.read-short($bufsize, :raw).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :534:	my ($buffer, $bytes-out) = self.encode(@left, @right, &encode-func, $type, :raw ).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :539:	my ($buffer, $bytes-out) = self.encode($left-in, $right-in, $frames, &encode-func, :raw ).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :567:	my ( $buffer, $bytes-out ) = self.encode(@frames, &encode-func, $type, :raw ).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :572:	my ( $buffer, $bytes-out ) = self.encode($frames-in, $frames, &encode-func, :raw ).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :747:	my ( $buffer, $bytes-out) = self.encode-flush(:nogap, :raw).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :751:	my ( $buffer, $bytes-out) = self.encode-flush(:raw).list;
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :940:	my ( $left, $right);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1008:	my ( $left, $right ) = uninterleave(@frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1019:	my ( $left, $right ) = uninterleave(@frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1030:	my ( $left, $right ) = uninterleave($frames-in, $frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1041:	my ( $left, $right ) = uninterleave($frames-in, $frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1052:	my ( $left, $right ) = uninterleave(@frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1063:	my ( $left, $right ) = uninterleave(@frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1074:	my ( $left, $right ) = uninterleave($frames-in, $frames);
JSTOWE/Audio-Encode-LameMP3 …/LameMP3.pm :1085:	my ( $left, $right ) = uninterleave($frames-in, $frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :37:	my ($left, $right) = uninterleave(@in-frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :82:	my ($left, $right) = uninterleave(@in-frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :127:	my ($left, $right) = uninterleave(@in-frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :173:	my ($left, $right) = uninterleave(@in-frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :218:	my ($left, $right) = uninterleave(@in-frames);
JSTOWE/Audio-Encode-LameMP3 …/050-encode.t :464:	my ( $b, $c);
JSTOWE/Audio-Fingerprint-Chromaprint …/README.md :20:	my ( $data, $frames ) = $wav.read-short($wav.frames, :raw);
JSTOWE/Audio-Fingerprint-Chromaprint …/Chromaprint.pm :26:	my ( $data, $frames ) = $wav.read-short($wav.frames, :raw);
JSTOWE/Audio-Fingerprint-Chromaprint …/030-fingerprint.t :27:	my ( $data, $frames ) = $wav-obj.read-short($r-frames, :raw);
JSTOWE/Audio-Hydrogen …/euclid :140:	my ($instrument, $slots, $fills) = $part.split(',',:skip-empty).map({$_.Int});
JSTOWE/Audio-Liquidsoap …/Liquidsoap.pm :752:	my ( $name, $type ) = $var.split(/\s+\:\s+/);
JSTOWE/Audio-Liquidsoap …/Liquidsoap.pm :918:	my ( $key, $value ) = $line.split('=',2);
JSTOWE/Audio-Liquidsoap …/Liquidsoap.pm :930:	if my ( $key, $value) = get-metadata-pair($line) {
JSTOWE/Audio-Liquidsoap …/Liquidsoap.pm :1192:	my ($name, $type) = $item-line.split(/\s+\:\s+/);
JSTOWE/Audio-Liquidsoap …/050-list.t :117:	my ( $con-rid, $ign-rid ) = @secondary-queue.pick(2);
JSTOWE/Audio-Liquidsoap …/test-resources.liq :26:	output.dummy(id="dummy-output", radio)
JSTOWE/Audio-Silan …/Silan.pm :147:	my ( $start, $end ) = $data<sound>[0].list;
JSTOWE/Audio-Sndfile …/Sndfile.pm :380:	my ($buff, $rc ) = self.read-read($frames, $info, &read-sub, $type, :raw).list;
JSTOWE/Audio-Sndfile …/050-sanity.t :59:	my ($shorts-raw-in,$shorts-raw-frames);
JSTOWE/Chronic …/Chronic.pm :199:	my ($top, $divisor) = $exp.split('/');
JSTOWE/Chronic …/Chronic.pm :203:	my ( $min, $max ) = $v.split('-');
JSTOWE/Doublephone …/020-words.t :18:	my ( $out-one, $out-two ) = double-metaphone($in);
JSTOWE/Linux-Cpuinfo …/Cpu.pm :142:	my ($key, $value) = $line.split(/\s*\:\s*/);
JSTOWE/UNIX-Privileges …/02-root.t :32:	my ($ch1, $ch2);
JSTOWE/Unix-Groups …/Groups.pm :101:	my ( $name, $pass, $id, $users ) = $line.split(':');
JSTOWE/XML-Class …/110-custom.t :22:	my ( $re, $im) = $v.split(',');
KAJI/App-Platform …/Container.pm6 :28:	my ($from, $to) = split / ":" /, $_;
KAJI/App-Platform …/Container.pm6 :53:	my ($option, $value) = $_.split(' ');
KAJI/App-Platform …/Container.pm6 :104:	my ($owner, $group, $mode);
KAJI/App-Platform …/Container.pm6 :130:	my ($owner, $group, $mode);
KAJI/App-Platform …/99-setup.t :45:	my ($proc, $out, $docker-ps, $docker-out, $versus, $dns-name, $found, %addr);
KAJI/App-Platform …/99-setup.t :107:	my ($proc, $out, $found);
KAJI/App-Platform …/author-02-project.t :155:	$proc.out.lines.map({ my ($key, $val) = .split('='); %vars{$key} = $val });
KOORCHIK/LIVR …/Meta.pm6 :41:	my ( @results, @errors );
KOORCHIK/LIVR …/Meta.pm6 :74:	my ( @results, @errors );
KOORCHIK/LIVR …/Meta.pm6 :112:	my ( @results, @errors );
KOORCHIK/LIVR …/Validator.pm6 :62:	my ($rule-name, $rule-args) = self!parse-rule($rule);
KOORCHIK/LIVR …/Validator.pm6 :84:	my ( %errors, %result );
KOORCHIK/LIVR …/Validator.pm6 :125:	my ($name, $args) = $rule.kv;
KUERBIS/Term-Choose …/Choose.pm6 :142:	my ( $str, $len ) = to-printwidth(
KUERBIS/Term-Choose …/Choose.pm6 :151:	my ( $str, $len ) = to-printwidth(
KUERBIS/Term-Choose …/Choose.pm6 :160:	my ( $str, $len ) = to-printwidth(
KUERBIS/Term-Choose …/Choose.pm6 :396:	my ( Int $new_term_w, Int $new_term_h ) = get-term-size();
KUERBIS/Term-Choose …/Choose.pm6 :1005:	my ( Int $row, Int $col );
KUERBIS/Term-Choose …/Screen.pm6 :39:	my ( $width, $height );
KUERBIS/Term-Form …/Form.pm6 :82:	my ( $tmp_w, $count ) = ( 0, 0 );
KUERBIS/Term-Form …/Form.pm6 :583:	my ( $m ) = @_;
KUERBIS/Term-Form …/Form.pm6 :831:	my ( $term_w, $term_h ) = get-term-size();
KUERBIS/Term-Form …/Form.pm6 :864:	my ( $tmp_term_w, $tmp_term_h ) = get-term-size();
KUERBIS/Term-TablePrint …/TablePrint.pm6 :279:	my ( Int $count, Int $step ) = self!_set_progress_bar; #
KUERBIS/Term-TablePrint …/TablePrint.pm6 :323:	my ( Int $count, Int $step ) = self!_set_progress_bar; #
KUERBIS/Term-TablePrint …/TablePrint.pm6 :462:	my ( Int $count, Int $step ) = self!_set_progress_bar; #
LEONT/Getopt-Long …/Long.pm :96:	my ($key, $value) = $pair.split('=', 2);
LEONT/Getopt-Long …/Long.pm :101:	my ($key, $value) = $pair.split('=', 2);
LEONT/Getopt-Long …/Long.pm :147:	my ($multi-class, $multi-args, $arity, $options-args, $negatable) = $<argument>.ast;
LEONT/Getopt-Long …/Long.pm :396:	my ($name) = $element.key ~~ / ^ (\w+) /[0];
LEONT/Path-Finder …/Finder.pm :229:	my ($min, $max) = $depth-range.int-bounds;
LEONT/Path-Finder …/Finder.pm :367:	my ($item, $depth, $base, $result) = @( @queue.shift );
LEONT/Path-Finder …/content.t :12:	my ( $rule, @files );
MARTIMM/MongoDB …/find.t :11:	my (@documents, $cursor);
MARTIMM/MongoDB …/Collection.pm6 :484:	my ( $k, $v) = $item.kv;
MELEZHIK/Sparky …/about.tt :1:	% my ($css, $doc) = @_;
MELEZHIK/Sparky …/builds.tt :1:	% my ( $css, @rows) = @_;
MELEZHIK/Sparky …/project.tt :1:	% my ( $css, $project, $project-conf, $path, $err ) = @_;
MELEZHIK/Sparky …/report.tt :1:	% my ( $css, $project, $build_id, $path ) = @_;
MOZNION/Router-Boost …/Boost.pm6 :72:	my ($name, $pattern) = $captured.split(':', 2);
MOZNION/Router-Boost …/Boost.pm6 :105:	my ($captured, $stuff) = @!leaves[$LEAF-IDX];
MOZNION/Router-Boost …/Method.pm6 :28:	my ($method, $stuff) = @route;
MOZNION/Stream-Buffered …/File.pm6 :14:	my ($filename, $fh) = tempfile;
NINE/Inline-Perl5 …/README.md :224:	my ($perl6) = @_;
NINE/Inline-Perl5 …/README.md :290:	my ($self) = @_;
NINE/Inline-Perl5 …/dancr.pl :54:	my ($source) = @_;
NINE/Inline-Perl5 …/dancr.pl :56:	my ($target) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :727:	my ($j, @svs) := self.setup_arguments(@args, %args);
NINE/Inline-Perl5 …/Perl5.pm6 :1137:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1142:	my ($self, $other) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1149:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1155:	my ($self) = shift;
NINE/Inline-Perl5 …/Perl5.pm6 :1177:	my ($class, $handle) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1184:	my ($class, $p6obj) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1190:	my ($self, @list) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1195:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1202:	my ($class, $hash) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1209:	my ($class, $p6hash) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1215:	my ($self, $key) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1222:	my ($self, $key) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1226:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1232:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1236:	my ($self) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1249:	my ($data) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1292:	my ($code) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1297:	my ($name, @args) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1302:	my ($class, $name, @args) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1316:	my ($static_class, $self, $args, $dynamic_class) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1333:	my ($static_class, $dynamic_class, $object) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1341:	my ($package, $name, $code) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1350:	my ($package, $name, @attributes) = @_;
NINE/Inline-Perl5 …/Perl5.pm6 :1375:	my ($self, $regex) = @_;
NINE/Inline-Perl5 …/call.t :55:	my ($self, $undef) = @_;
NINE/Inline-Perl5 …/call.t :61:	my ($self, $h) = @_;
NINE/Inline-Perl5 …/call.t :81:	my ($self, $foo) = @_;
NINE/Inline-Perl5 …/call.t :88:	my ($class, $val) = @_;
NINE/Inline-Perl5 …/call.t :93:	my ($self) = @_;
NINE/Inline-Perl5 …/call.t :98:	my ($self, $a, $b) = @_;
NINE/Inline-Perl5 …/call_back.t :11:	my ($perl6) = @_;
NINE/Inline-Perl5 …/callables.t :16:	my ($code) = @_;
NINE/Inline-Perl5 …/callables.t :22:	my ($something, $param) = @_;
NINE/Inline-Perl5 …/callables.t :28:	my ($name) = @_;
NINE/Inline-Perl5 …/callables.t :30:	my ($param) = @_;
NINE/Inline-Perl5 …/callables.t :37:	my ($array) = @_;
NINE/Inline-Perl5 …/can.t :10:	my ($p6obj) = @_;
NINE/Inline-Perl5 …/can.t :14:	my ($p6obj) = @_;
NINE/Inline-Perl5 …/can.t :18:	my ($p6obj) = @_;
NINE/Inline-Perl5 …/can.t :22:	my ($name) = @_;
NINE/Inline-Perl5 …/exceptions.t :90:	my ($foo) = @_;
NINE/Inline-Perl5 …/exceptions.t :106:	my ($foo) = @_;
NINE/Inline-Perl5 …/file_handles.t :18:	my ($handle) = @_;
NINE/Inline-Perl5 …/file_handles.t :23:	my ($filename, $filehandle) = tempfile;
NINE/Inline-Perl5 …/file_handles.t :33:	my ($handle) = @_;
NINE/Inline-Perl5 …/Bar.pm :6:	my ($self) = @_;
NINE/Inline-Perl5 …/Foo.pm :12:	my ($self) = @_;
NINE/Inline-Perl5 …/Foo.pm :22:	my ($self) = @_;
NINE/Inline-Perl5 …/Foo.pm :32:	my ($self) = @_;
NINE/Inline-Perl5 …/Foo.pm :42:	my ($self) = @_;
NINE/Inline-Perl5 …/P5Import.pm :10:	my ($self, @args) = @_;
NINE/Inline-Perl5 …/P5Import.pm :13:	my ( $caller, $script ) = caller;
NINE/Inline-Perl5 …/TakesHash.pm :7:	my ($class, %args) = @_;
NINE/Inline-Perl5 …/TestV6.pm :11:	my ($class, %args) = @_;
NINE/Inline-Perl5 …/TestV6.pm :21:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :34:	my ($class, $foo) = @_;
NINE/Inline-Perl5 …/TestV6.pm :41:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :46:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :51:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :60:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :66:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :72:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :78:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :88:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :95:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :101:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :109:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6.pm :117:	my ($self, $obj) = @_;
NINE/Inline-Perl5 …/TestV6.pm :123:	my ($class, $code, @attrs) = @_;
NINE/Inline-Perl5 …/TestV6.pm :136:	my ($self) = @_;
NINE/Inline-Perl5 …/TestV6Directly.pm :7:	my ($class) = @_;
NINE/Inline-Perl5 …/modify_array.t :10:	my ($array_filler) = @_;
NINE/Inline-Perl5 …/modify_hash.t :10:	my ($hash_filler) = @_;
NINE/Inline-Perl5 …/overload.t :13:	my ($self) = @_;
NINE/Inline-Perl5 …/overload.t :18:	my ($self) = @_;
NINE/Inline-Perl5 …/overload.t :24:	my ($class, $str) = @_;
NINE/Inline-Perl5 …/overload.t :30:	my ($class, $str) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :37:	my ($str) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :42:	my ($str) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :55:	my ($str) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :73:	my ($ref) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :82:	my ($ref) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :92:	my (%params) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :100:	my ($self, %params) = @_;
NINE/Inline-Perl5 …/p6_to_p5.t :117:	my ($string, $re) = @_;
NINE/Inline-Perl5 …/perl5parent.t :30:	my ($self) = @_;
NINE/Inline-Perl5 …/perl5parent.t :40:	my ($self) = @_;
NINE/Inline-Perl5 …/perl5parent.t :57:	my ($self) = @_;
NINE/Inline-Perl5 …/stringify.t :20:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :24:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :28:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :32:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :36:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :40:	my ($obj, $str) = @_;
NINE/Inline-Perl5 …/stringify.t :44:	my ($obj) = @_;
NINE/Inline-Perl5 …/stringify.t :48:	my ($obj) = @_;
NINE/Inline-Perl5 …/tie.t :12:	my ($class) = @_;
NINE/Inline-Perl5 …/tie.t :17:	my ($self) = @_;
NINE/Inline-Perl5 …/tie.t :21:	my ($self) = @_;
PMQS/Archive-SimpleZip …/Utils.pm6 :53:	my ($volume, $directories, $file) =
PMQS/Archive-SimpleZip …/004-canonical.t :38:	my ($input, $expected) = |$r;
PMQS/Archive-SimpleZip …/004-canonical.t :48:	my ($input, $expected) = |$r;
PMQS/Archive-SimpleZip …/004-canonical.t :72:	my ($input, $expected) = |$r;
PMQS/Archive-SimpleZip …/ZipTest.pm6 :13:	my ($filename,$filehandle) = tempfile(:tempdir($base_dir));
ROBERTLE/Cache-Async …/Async.pm6 :348:	my ($hits, $misses) = $cache.hits-misses;
ROBERTLE/Cache-Async …/05-monitoring.t :17:	my ($hits, $misses) = $cache.hits-misses;
SACOMO/Uzu …/Render.pm6 :191:	my ($page_name, $out_ext) = split '.', $file_name;
SACOMO/Uzu …/Render.pm6 :249:	my ($template_yaml, $template_html) = ~<< ( slurp($path, :r) ~~ / ( ^^ '---' .* '---' | ^^ ) [\v]? (.*) / );
SACOMO/Uzu …/Render.pm6 :273:	my ($partial_html, %partial_vars) = parse-template :$path;
SACOMO/Uzu …/Render.pm6 :540:	my ($modified_timestamps, $partial_render_queue) =
SACOMO/Uzu …/Render.pm6 :731:	my ($page_html, %page_vars) = parse-template :$path;
SACOMO/Uzu …/Render.pm6 :782:	my ($layout_template, $layout_vars) =
SAMCV/Git-Log …/Log.pm6 :120:	my ($added, $removed, $filename) = $line.split("\t", 3);
SAMGWISE/Net-NNG …/req-rep.p6 :8:	my ($rep-sock, $req-sock) = (nng-rep0-open, nng-req0-open);
SAMGWISE/Net-NNG …/05-time-out.t :7:	my ($req, $rep) = (nng-req0-open, nng-rep0-open);
SAMGWISE/ScaleVec …/Graph.pm6 :179:	my ($current-diff, $remaining-diffs) = $diffs[0], $diffs[1..*];
SAMGWISE/ScaleVec …/Foundation.pm6 :27:	my ($l, $r) = ($^a, $^b);
SAMGWISE/ScaleVec …/Voicer.pm6 :15:	my ($melody-step, $bass-step) = ($melody, $bass).map: { $sv.reflexive-step($_).round }
SAMGWISE/ScaleVec …/Intervalic.pm6 :103:	# my ($step-below, $value-below) = ( self.scale-pv.kv.map( -> $k, $v { $($k, $v) } ).grep( { .[1] <= $pc-value } ) ).tail;
SAMGWISE/ScaleVec …/Graph.t :37:	my ($i, $ii, $iii, $iv, $v, $v7, $vi, $vii) = $graph.vectors;
SAMGWISE/Slang-Predicate …/README.md :11:	my (\α, \β) = (T, F);
SAMGWISE/Slang-Predicate …/Predicate.pm6 :15:	my (\α, \β) = (T, F);
SCIMON/Algorithm-GooglePolylineEncoding …/GooglePolylineEncoding.pm6 :51:	my ( $cur-lat, $cur-lon ) = ( 0,0 );
SCIMON/Algorithm-GooglePolylineEncoding …/GooglePolylineEncoding.pm6 :81:	my ( $lat, $lon ) = ( 0, 0 );
SCIMON/Game-Sudoku …/Solver.pm6 :31:	my ($x,$y) = $cell;
SCIMON/Game-Sudoku …/Solver.pm6 :68:	my ( $x, $y ) = $pair.key;
SCIMON/Game-Sudoku …/Solver.pm6 :84:	my ( $x, $y ) = $p.key;
SCIMON/Game-Sudoku …/04-possible.t :34:	while [+] (^9 X ^9).map( -> ($x,$y) { ($x,$y) => $game.possible($x,$y) } ).grep( *.value.elems == 1 ).map( -> $p { my ( $x, $y ) = $p.key; $game.cell($x,$y,$p.value[0]); 1; } ) {
SCIMON/Proc-InvokeEditor …/InvokeEditor.pm6 :62:	my ( $test-file, @args ) = $test.split( / \s / );
SCIMON/Proc-InvokeEditor …/InvokeEditor.pm6 :85:	my ( $file, $handle ) = tempfile;
SCIMON/Trait-Env …/Attribute.pm6 :38:	%*ENV{$env-name}:exists ?? %*ENV{$env-name}.split($sep).map( -> $str { my ($k, $v ) = $str.split($kvsep); $k => $v; } ) !! {};
SCIMON/Trait-Env …/Variable.pm6 :36:	%*ENV{$env-name}:exists ?? %*ENV{$env-name}.split($sep).map( -> $str { my ($k, $v ) = $str.split($kvsep); $k => $v; } ) !! {};
SKAJI/App-Mi6 …/Mi6.pm6 :69:	my ($module, $module-file) = guess-main-module();
SKAJI/App-Mi6 …/Mi6.pm6 :82:	my ($main-module, $main-module-file) = guess-main-module();
SKAJI/App-Mi6 …/Mi6.pm6 :91:	my ($module, $module-file) = guess-main-module();
SKAJI/App-Mi6 …/Mi6.pm6 :139:	my ($user, $repo) = guess-user-and-repo();
SKAJI/App-Mi6 …/Mi6.pm6 :240:	my ($k, $v) = $_.kv;
SKAJI/App-Mi6 …/Mi6.pm6 :289:	my ($, $url) = $line.split(/\s+/);
SKAJI/App-Mi6 …/Release.pm6 :51:	my ($klass, $desc) = $pair.kv;
SKAJI/CPAN-Uploader-Tiny …/Tiny.pm6 :76:	my ($boundary, $content) = $multi.finalize;
SKAJI/HTTP-Tinyish …/Base.pm6 :36:	my ($proto, $status, $reason) = split /' '/, $status_line, 3;
SKAJI/HTTP-Tinyish …/Curl.pm6 :19:	my ($out-file, $out-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :20:	my ($err-file, $err-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :21:	my ($header-file, $header-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :61:	my ($out-file, $out-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :62:	my ($err-file, $err-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :63:	my ($header-file, $header-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/Curl.pm6 :121:	my ($data-file, $data-fh) = $factory.tempfile;
SKAJI/HTTP-Tinyish …/FileTempFactory.pm6 :8:	my ($file, $fh) = tempfile(:!unlink);
TBROWDER/Date-Names …/make-tests.p6 :48:	my ($f, $fh);
TBROWDER/Geo-Ellipsoid …/README.md :169:	my ($lat2, $lon2) = $geo.at($lat1, $lon1, $range, $bearing);
TBROWDER/Geo-Ellipsoid …/README.md :176:	my ($dist, $theta) = $geo.to($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/README.md :190:	my ($x, $y) = $geo.displacement($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/README.md :169:	my ($lat2, $lon2) = $geo.at($lat1, $lon1, $range, $bearing);
TBROWDER/Geo-Ellipsoid …/README.md :176:	my ($dist, $theta) = $geo.to($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/README.md :190:	my ($x, $y) = $geo.displacement($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :143:	my( $a, $rf ) = @{$Geo::Ellipsoid::ellipsoids{$ell}};
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :214:	my( $a, $rf ) = @{$Geo::Ellipsoid::ellipsoids{$ell}};
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :221:	my( $ell ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :256:	$tests{to}{code} = [ $code, 'my( $r, $a );' ];
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :262:	my($azp,$azs);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :273:	my( $r1,$r2,$r3,$r4,$r5);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :290:	my( $r, $az ) = $e->to($lat1,$lon1,$lat2,$lon2);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :313:	my ( $r, $az ) = $e->to($lat1,$lon1,$lat2,$lon2);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :325:	my( $range, $bearing, $lat1, $lon1, $lat2, $lon2 ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :352:	my( $range, $lat1, $lon1, $lat2, $lon2 ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :377:	my( $lat1, $lon1, $lat2, $lon2 ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :419:	my($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :442:	my ( $lat2, $lon2 ) = $e->at($lat1,$lon1,$range,$bearing);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :455:	my( $lat1, $lon1, $range, $bearing ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :456:	#my( $lat1, $lon1, $range, $bearing, $lat2, $lon2 ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :457:	my( $lat3, $lon3 ) = $e_pos->at( $lat1, $lon1, $range, $bearing );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :458:	my( $lat4, $lon4 ) = $e_sym->at( $lat1, $lon1, $range, $bearing );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :476:	my( $lat1, $lon1, $x, $y ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :477:	my( $lat3, $lon3 ) = $e_pos->location( $lat1, $lon1, $x, $y );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :478:	my( $lat4, $lon4 ) = $e_sym->location( $lat1, $lon1, $x, $y );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :496:	my( $lat1, $lon1, $lat2, $lon2 ) = @args;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :497:	my( $x, $y ) = $e->displacement(@args);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :536:	my( $n, $ell ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :559:	my( $n, $units, $default ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :575:	my( $ell ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :585:	my( $ell, $var, $e ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :641:	"my( \$xs, \$ys );";
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :654:	my( $r_lat, $r_lon ) = $e->scales($deg);
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :681:	my( $fh, $test, $n ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :731:	my( $east, $north ) = @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :740:	my( $lat1deg, $lat1min, $lat1sec,
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :765:	my( $lat1, $lon1, $lat2, $lon2 ) = @_; # in radians
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :768:	my( $dlat1, $dlon1, $dlat2, $dlon2 ) = map { $_ * $degrees_per_radian } @_;
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :775:	my( $range, $bearing ) = $ellipsoid->to( $lat1, $lon1, $lat2, $lon2 );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :776:	my( $range2, $bearing2 ) = $ellipsoid2->to( $dlat1, $dlon1, $dlat2, $dlon2 );
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :789:	my( $lat1deg, $lat1min, $lat1sec,
TBROWDER/Geo-Ellipsoid …/gentest-ellipsoid.p6 :844:	my( $x, $y ) = @_;
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :264:	my ($class, %args) = @_;
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :423:	my ($major, $recip) = @(%ellipsoids{$ellipsoid});
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :647:	my ($range, $bearing) = self._inverse(|@a);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :667:	my ($range, $bearing) = self._inverse(|@a);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :705:	my ($lat2, $lon2) = $geo.at($lat1, $lon1, $range, $bearing);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :712:	my ($lat, $lon, $az) = normalize-input-angles(self.units, $lat1, $lon1, $bearing);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :714:	my ($lat2, $lon2) = self._forward($lat, $lon, $range, $az);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :733:	my ($dist, $theta) = $geo.to($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :742:	my ($range, $bearing) = self._inverse(|@a);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :774:	my ($x, $y) = $geo.displacement($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :789:	my ($range, $bearing) = self._inverse(|@a);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :874:	my ($c2a, $c, $cx, $cy, $cz, $d, $del, $e, $sx, $sy, $y);
TBROWDER/Geo-Ellipsoid …/Ellipsoid.pm6 :1024:	my ($cy, $cz, $e, $sy);
TBROWDER/Geo-Ellipsoid …/Utils.pm6 :110:	my ($d, $m, $s) = (0, 0, 0);
TBROWDER/Geo-Ellipsoid …/Utils.pm6 :179:	my ($d, $m, $s) = (0, 0, 0);
TBROWDER/Geo-Ellipsoid …/04-scale.t :21:	my ($xs, $ys);
TBROWDER/Geo-Ellipsoid …/05-to.t :22:	my ($r, $a);
TBROWDER/Geo-Ellipsoid …/06-at.t :24:	my ($lat1, $lon1, $lat2, $lon2, $x, $y);
TBROWDER/Geo-Ellipsoid …/07-location.t :24:	my ($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Geo-Ellipsoid …/08-range.t :25:	my ($r1,$r2,$r3,$r4,$r5);
TBROWDER/Geo-Ellipsoid …/09-bearing.t :22:	my ($azp,$azs);
TBROWDER/Geo-Ellipsoid …/10-displacement.t :22:	my ($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :151:	my ($r_lat, $r_lon) = $earth.scales($deg);
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :191:	my ($dlat1, $dlon1, $dlat2, $dlon2) = map({ $_ * $degrees_per_radian },
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :198:	my ($range, $bearing) = $ellipsoid.to($lat1, $lon1, $lat2, $lon2);
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :235:	#while ((my ($ell, $aref) = %Geo::Ellipsoid::ellipsoids.each)) {
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :294:	my ($lat, $lon, $rg, $bg);
TBROWDER/Geo-Ellipsoid …/test-ellipsoid.p6 :301:	my ($lat2, $lon2) = $o.$_forward($lat, $lon, $rg, $bg);
TBROWDER/Geo-Ellipsoid …/55-forward-inverse.t :13:	my ($faz, $baz, $dist);
TBROWDER/Geo-Ellipsoid …/55-forward-inverse.t :14:	my ($FAZ, $BAZ, $DIST);
TBROWDER/Geo-Ellipsoid …/04-scale.t :11:	my( $xs, $ys );
TBROWDER/Geo-Ellipsoid …/05-to.t :11:	my( $r, $a );
TBROWDER/Geo-Ellipsoid …/06-at.t :12:	my($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Geo-Ellipsoid …/07-location.t :12:	my($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Geo-Ellipsoid …/08-range.t :15:	my( $r1,$r2,$r3,$r4,$r5);
TBROWDER/Geo-Ellipsoid …/09-bearing.t :12:	my($azp,$azs);
TBROWDER/Geo-Ellipsoid …/10-displacement.t :12:	my($lat1,$lon1,$lat2,$lon2,$x,$y);
TBROWDER/Number-More …/More.pm6 :450:	my ($bi, $bo);
TBROWDER/Number-More …/030-general-base-transforms.t :23:	my ($tnum-in, $tnum-out);
TBROWDER/Proc-More …/README.md :20:	my ($exitcode, $stderr, $stdout) = run-command $cmd, :dir($other-dir), :all;
TBROWDER/Proc-More …/More.pm6 :44:	my ($Rts, $Uts, $Sts);
TBROWDER/Proc-More …/More.pm6 :226:	my ($exitcode, $stderr, $stdout);
TBROWDER/Proc-More …/030-process-time.t :34:	my ($prog-file, $fh) = tempfile;
TBROWDER/Proc-More …/030-process-time.t :40:	my ($res, $typ, $fmt);
TBROWDER/Proc-More …/040-run-command.t :10:	my ($exitcode, $stderr, $stdout);
TBROWDER/Proc-More …/040-run-command.t :36:	my ($prog-file, $fh) = tempfile;
TBROWDER/Proc-More …/050-time-command.t :33:	my ($prog-file, $fh) = tempfile;
TBROWDER/Text-More …/create-md.p6 :17:	my ($mfil, $bdir, $odir, $nofold, $debug, $verbose);
TBROWDER/Text-More …/create-md.p6 :530:	my ($line1, $last-line) = split-line($sig, ')');
TBROWDER/Text-More …/create-md.p6 :587:	my ($maxlen, $maxidx) = analyze-line-lengths(@lines);
TBROWDER/Text-More …/create-pod6.p6 :17:	my ($mfil, $bdir, $odir, $nofold, $debug, $verbose);
TBROWDER/Text-More …/create-pod6.p6 :530:	my ($line1, $last-line) = split-line($sig, ')');
TBROWDER/Text-More …/create-pod6.p6 :587:	my ($maxlen, $maxidx) = analyze-line-lengths(@lines);
TBROWDER/Text-More …/020-split-line.t :10:	my ($line1, $line2) = split-line($s1, '(');
TBROWDER/Text-More …/020-strip-comment.t :8:	my (@s, @stripped);
TBROWDER/Text-More …/020-write-paragraph.t :21:	my (@para, @p1);
TIMOTIMO/SDL2-Raw …/shooter.pl :50:	my ($x, $y) = ^W .pick, ^H .pick;
TITSUKI/Algorithm-HierarchicalPAM …/README.md :22:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-HierarchicalPAM …/HierarchicalPAM.pm6 :55:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-HierarchicalPAM …/Formatter.pm6 :34:	my ($doc_i, *@wfreqs) = .words;
TITSUKI/Algorithm-HierarchicalPAM …/Formatter.pm6 :37:	my ($word, $freq) = $wfreq.split(":");
TITSUKI/Algorithm-HierarchicalPAM …/01-basic.t :13:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-HierarchicalPAM …/01-basic.t :28:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-HierarchicalPAM …/01-basic.t :43:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-HierarchicalPAM …/01-basic.t :55:	my ($documents, $vocabs) = Algorithm::HierarchicalPAM::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/README.md :22:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/LDA.pm6 :51:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/Formatter.pm6 :34:	my ($doc_i, *@wfreqs) = .words;
TITSUKI/Algorithm-LDA …/Formatter.pm6 :37:	my ($word, $freq) = $wfreq.split(":");
TITSUKI/Algorithm-LDA …/01-basic.t :14:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/01-basic.t :29:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/01-basic.t :44:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LDA …/01-basic.t :56:	my ($documents, $vocabs) = Algorithm::LDA::Formatter.from-plain(@documents);
TITSUKI/Algorithm-LibSVM …/LibSVM.pm6 :64:	my ($label, $features) = $line.trim.split(/\s+/,2);
TITSUKI/Algorithm-LibSVM …/LibSVM.pm6 :89:	my ($total-correct, $total-error) = 0, 0;
TITSUKI/Algorithm-LibSVM …/LibSVM.pm6 :90:	my ($sum-p, $sum-t, $sum-pp, $sum-tt, $sum-pt) = 0, 0, 0, 0, 0;
TITSUKI/Algorithm-MinMaxHeap …/MinMaxHeap.pm6 :149:	my ($smallest-index, $is-child) = %response<smallest-index>, %response<is-child>;
TITSUKI/Algorithm-MinMaxHeap …/MinMaxHeap.pm6 :168:	my ($largest-index, $is-child) = %response<largest-index>, %response<is-child>;
TITSUKI/Algorithm-MinMaxHeap …/MinMaxHeap.pm6 :189:	my ($smallest-value, $smallest-index, $is-child);
TITSUKI/Algorithm-MinMaxHeap …/MinMaxHeap.pm6 :245:	my ($largest-value, $largest-index, $is-child);
TITSUKI/Chart-Gnuplot …/README.md :28:	my ($header, *@body) = @data;
TITSUKI/Chart-Gnuplot …/Gnuplot.pm6 :740:	my ($header, *@body) = @data;
TITSUKI/Random-Choice …/Choice.pm6 :15:	my (@large, @small);
TITSUKI/Random-Choice …/Choice.pm6 :25:	my ($pl, $l) = @small.shift;
TITSUKI/Random-Choice …/Choice.pm6 :26:	my ($pg, $g) = @large.shift;
TITSUKI/Random-Choice …/Choice.pm6 :38:	my ($pg, $g) = @large.shift;
TITSUKI/Random-Choice …/Choice.pm6 :43:	my ($pl, $l) = @small.shift;
TOKUHIROM/HTTP-Server-Tiny …/moar-profiler-cli.pl :50:	my ($node) = @_;
TOKUHIROM/HTTP-Server-Tiny …/moar-profiler-json-to-callgrind :43:	my ($node) = @_;
TOKUHIROM/HTTP-Server-Tiny …/Tiny.pm6 :134:	my ($header_len, $env) = parse-http-request($!buf);
TOKUHIROM/HTTP-Server-Tiny …/Tiny.pm6 :272:	my ($status, $headers, $body) = sub {
TOKUHIROM/HTTP-Server-Tiny …/08-long-req.t :36:	my ($headers, $body) = $buf.split(/$CRLF$CRLF/, 2);
TYIL/Config-Parser-toml …/02-write.t :26:	my ($filename, $fh) = tempfile;
TYIL/Hash-Merge …/01-thing.t :33:	my (%z, %y);
TYIL/Hash-Merge …/01-thing.t :44:	my (%z, %y);
UFOBAT/Bailador …/README.md :366:	% my ($name, $something) = @_;
UFOBAT/Bailador …/404.xx :1:	% my ($h) = @_;
UFOBAT/Bailador …/500.xx :1:	% my ($h) = @_;
UFOBAT/Bailador …/tmpl.tt :1:	% my ($h) = @_;
UFOBAT/Bailador …/default.tt :1:	% my ($h) = @_;
UFOBAT/Bailador …/other.tt :1:	% my ($h) = @_;
UFOBAT/Bailador …/main.tt :1:	% my (%h) = @_;
UFOBAT/Bailador …/index.tt :1:	% my ($h) = @_;
UFOBAT/Bailador …/Configuration.pm :111:	my ( $k, $v ) = $p . split(/<[:=]>/);
UFOBAT/Bailador …/Request.pm :142:	my ($name, $value) = $cookie.trim.split(/\s*\=\s*/, 2);
UFOBAT/Bailador …/Sessions.pm :39:	my ($data, $hmac) = $unchecked-session-id.split(/\-\-/, 2);
UFOBAT/Bailador …/error.template :1:	% my ($exception, $request) = @_;
UFOBAT/Bailador …/index.html :1:	% my ($h) = @_;
UFOBAT/Bailador …/09-OO-nested-routes.t :63:	my ($session-cookie-name, $value) = $response[1][1].value.trim.split(/\s*\=\s*/, 2);
UFOBAT/I18N-LangTags …/README.md :210:	my($lang, $expr) = ($1, $2);
UFOBAT/I18N-LangTags …/README.md :246:	my($lang, $expr) = ($1, $2);
UFOBAT/I18N-LangTags …/LangTags.pm6 :195:	my ($keys, $vals) = .kv;
UFOBAT/I18N-LangTags …/LangTags.pm6 :505:	my($lang, $expr) = ($1, $2);
UFOBAT/I18N-LangTags …/LangTags.pm6 :549:	my($lang, $expr) = ($1, $2);
UFOBAT/I18N-LangTags …/03-list.t :9:	my ($p5-name, $p5-disrec) = $p.run(q:to/END/);
UFOBAT/XML-XPath …/Node.pm6 :28:	my ($uri, $node-name) = namespace-infos($r);
UFOBAT/XML-XPath …/NodeTest.pm6 :38:	my ($ns, $name) = $.value.split(/':'/);
UFOBAT/XML-XPath …/NodeTest.pm6 :40:	my ($attr-ns, $attr-name) = $key.split(/':'/);
UFOBAT/XML-XPath …/NodeTest.pm6 :176:	my ($uri, $node-name) = namespace-infos($node);
UFOBAT/XML-XPath …/NodeTest.pm6 :182:	my ($node-ns, $node-name) = $node.name.split(/':'/);
UGEXE/Acme-Polyglot-Levenshtein-Damerau …/Damerau.pm :15:	my (@currentRow, @previousRow, @transpositionRow);
UGEXE/zef …/CLI.pm6 :36:	my (:@test-pass, :@test-fail) := @tested.classify: {.test-results.grep(*.so) ?? <test-pass> !! <test-fail> }
UGEXE/zef …/CLI.pm6 :50:	my (:@pass, :@fail) := @built.classify: {$_.?build-results !=== False ?? <pass> !! <fail> }
UGEXE/zef …/CLI.pm6 :78:	my (:@paths, :@uris, :@identities) := @wants.classify: -> $wanted {
UGEXE/zef …/CLI.pm6 :92:	my (:@wanted-paths, :@skip-paths) := @paths\
UGEXE/zef …/CLI.pm6 :103:	my (:@wanted-uris, :@skip-uris) := @uri-candidates-to-check\
UGEXE/zef …/CLI.pm6 :113:	my (:@wanted-identities, :@skip-identities) := @identities\
UGEXE/zef …/CLI.pm6 :135:	my (:@local, :@remote) := @candidates.classify: {.dist ~~ Zef::Distribution::Local ?? <local> !! <remote>}
UGEXE/zef …/CLI.pm6 :227:	my (:@upgradable, :@current) := @requested.classify: -> $candi {
UGEXE/zef …/CLI.pm6 :241:	my (:@upgraded, :@failed) := @sorted-candidates.map(*.uri).classify: -> $uri {
UGEXE/zef …/CLI.pm6 :398:	my (:@remote, :@local) := @candidates.classify: {.dist !~~ Zef::Distribution::Local ?? <remote> !! <local>}
UGEXE/zef …/CLI.pm6 :562:	my (:@log-level, :@filtered-args) := @_.classify: {
UGEXE/zef …/LocalCache.pm6 :28:	my ($identity, $path) = $entry.split("\0");
UGEXE/zef …/LocalCache.pm6 :129:	my ($id, $path) = $line.split("\0");
UGEXE/zef …/git.pm6 :33:	my ($path, $checkout) = $str.match(/^(.+?)['#' (.*)]?$/);
UGEXE/zef …/git.pm6 :39:	my ($repo, $checkout) = $path.match(/^(.+?)['#' (.*)]?$/)>>.Str || return False;
UZLUISF/ENIGMA-Machine …/emachine.p6 :31:	my ($enc-key, $dec-key);
UZLUISF/ENIGMA-Machine …/Machine.pm6 :237:	#my ( $rotor1, $rotor2, $rotor3 ) = @!rotors.reverse;
UZLUISF/ENIGMA-Machine …/Machine.pm6 :238:	my ( $rotor1, $rotor2, $rotor3 ) = @!rotors.reverse;
UZLUISF/ENIGMA-Machine …/plugboard.t :146:	my ($m, $n) = ord($pair.comb.head) - ord('A'), ord($pair.comb.tail) - ord('A');
VRURG/IP-Addr …/v6.pm6 :348:	my ( $v6, $v4 );
VRURG/IP-Addr …/v6.pm6 :364:	my ( $zpos, $max-pos );
VRURG/IP-Addr …/v6.pm6 :365:	my ( $zlen, $max-len ) = 0, 0;
VRURG/IP-Addr …/v6.pm6 :393:	my ($start, $end ) = "", "";
VRURG/IP-Addr …/050-supply.t :13:	my (@res, @exp);
VRURG/IP-Addr …/050-supply.t :72:	my (@res, @exp);
VRURG/OO-Plugin …/Manager.pm6 :935:	my ($subc);
VRURG/OO-Plugin …/Manager.pm6 :1137:	my ( %by-plugin );
WARRINGD/Font-AFM …/Changes :23:	my ($kerned, $stringwidth) = $font.kern("RVX");
WARRINGD/Font-FreeType …/glyph-to-eps.pl :20:	my ($xmin, $ymin, $xmax, $ymax) = $outline.Array;
WARRINGD/Font-FreeType …/glyph-to-svg.pl :20:	my ($xmin, $ymin, $xmax, $ymax) = $outline.Array;
WARRINGD/Font-FreeType …/magick.pl :25:	my ($font_filename, $output_filename) = @ARGV;
WARRINGD/Font-FreeType …/magick.pl :45:	my ($text_x, $text_y) = (-$glyphs[0]->left_bearing + $border, $origin_y);
WARRINGD/Font-FreeType …/magick.pl :47:	my (undef, $adj_base_y) = adjust_position(0, 0);
WARRINGD/Font-FreeType …/magick.pl :48:	my (undef, $adj_top_y) = adjust_position(0, $face->ascender);
WARRINGD/Font-FreeType …/magick.pl :49:	my (undef, $adj_btm_y) = adjust_position(0, $face->descender);
WARRINGD/Font-FreeType …/magick.pl :58:	my ($adj_x, $adj_y) = adjust_position(0, 0);
WARRINGD/Font-FreeType …/magick.pl :60:	my ($bmp_img, $bmp_left, $bmp_top) = $_->bitmap_magick;
WARRINGD/Font-FreeType …/magick.pl :68:	my ($x, $y) = @_;
WARRINGD/Font-FreeType …/magick.pl :73:	my ($x, $y) = @_;
WARRINGD/Font-FreeType …/magick.pl :79:	my ($x, $y, $cx1, $cy1, $cx2, $cy2) = @_;
WARRINGD/Font-FreeType …/magick.pl :95:	my ($adj_x, undef) = adjust_position(0, 0);
WARRINGD/Font-FreeType …/magick.pl :106:	my ($x, $y) = @_;
WARRINGD/Font-FreeType …/10metrics_5x7bdf.t :50:	my ($fixed-size) = $bdf.fixed-sizes;
WARRINGD/Font-FreeType …/10metrics_5x7bdf.t :75:	my ($unicode, $name) = split /\s+/, $line;
WARRINGD/Font-FreeType …/10metrics_5x7bdf.t :142:	my ($left, $right) = .comb;
WARRINGD/Font-FreeType …/10metrics_verasans.t :116:	my ($unicode, $name) = split /\s+/, $line;
WARRINGD/Font-FreeType …/10metrics_verasans.t :168:	my ($left, $right) = .comb;
WARRINGD/HTML-Canvas-To-PDF …/PDF.pm6 :267:	my ($ShadingType, $Coords) = do given $gradient.type {
WARRINGD/HTML-Canvas-To-PDF …/PDF.pm6 :298:	my (\scale-x, \skew-x, \skew-y, \scale-y, \trans-x, \trans-y) = @ctm;
WARRINGD/HTML-Canvas …/Cairo.pm :227:	my ($dx, $dy) = self!align($text);
WARRINGD/HTML-Canvas …/Cairo.pm :232:	my ($dx, $dy) = self!align($text);
WARRINGD/PDF-Class …/util.t :6:	my (UInt $n, Str $r) = .list;
WARRINGD/PDF-Class …/util.t :12:	my (UInt $n, Str $a) = .list;
WARRINGD/PDF-Font-Loader …/font.t :34:	my ($font, $encoded) = .kv;
WARRINGD/PDF-ISO_32000 …/make-modules.p6 :16:	my ($entry, $type, $desc) = .list;
WBIKER/IO-Prompt …/01-simple.t :76:	my ($call, $output, $answer, $expected) = @row;
YNOTO/DB-Xoos …/Searchable.pm6 :13:	my (%option, %filter);
YNOTO/DB-Xoos …/Searchable.pm6 :127:	my (@*params, $sql);
YNOTO/DB-Xoos …/Searchable.pm6 :171:	my ($key, $val) = $col.kv;
YNOTO/DB-Xoos …/Searchable.pm6 :206:	my ($eq, $val);
YNOTO/DB-Xoos …/Searchable.pm6 :13:	my (%option, %filter);
YNOTO/DB-Xoos …/Searchable.pm6 :133:	my (@*params, $sql);
YNOTO/DB-Xoos …/Searchable.pm6 :177:	my ($key, $val) = $col.kv;
YNOTO/DB-Xoos …/Searchable.pm6 :212:	my ($eq, $val);
YNOTO/DB-Xoos …/Searchable.pm6 :13:	my (%option, %filter);
YNOTO/DB-Xoos …/Searchable.pm6 :126:	my (@*params, $sql);
YNOTO/DB-Xoos …/Searchable.pm6 :171:	my ($key, $val) = $col.kv;
YNOTO/DB-Xoos …/Searchable.pm6 :206:	my ($eq, $val);
YNOTO/DB-Xoos …/Row.pm6 :23:	my ($key, $spec) = $col.kv;
YNOTO/DB-Xoos …/Row.pm6 :38:	my ($key, $spec) = $rel.kv;
YNOTO/DB-Xoos …/Row.pm6 :87:	my ($key, $value) = $_.kv;
YNOTO/DB-Xoos …/Searchable.pm6 :13:	my (%option, %filter);
YNOTO/DB-Xoos …/Searchable.pm6 :126:	my (@*params, $sql);
YNOTO/DB-Xoos …/Searchable.pm6 :170:	my ($key, $val) = $col.kv;
YNOTO/DB-Xoos …/Searchable.pm6 :205:	my ($eq, $val);
YNOTO/DB-Xoos …/03-sqlite.t :25:	my ($sth, @raw, $scratch);
YNOTO/DB-Xoos …/04-relations.t :25:	my ($sth, $scratch);
YNOTO/DB-Xoos …/05-model-methods.t :24:	my ($sth, $scratch);
YNOTO/DB-Xoos …/06-compound-keys.t :24:	my ($sth, $scratch);
YNOTO/DB-Xoos …/07-yaml-models.t :31:	my ($sth, $scratch);
0racle/p6-Net-Netmask …/Netmask.pm6 :435:	my ($address, $bits) = $cidr.split('/');
7ojo/perl6-powerline-prompt …/powerline-daemon.p6 :11:	my ($path, $exit) = $buf.decode('UTF-8').Str.chop.split(' ');
Altai-man/ASN-META …/META.pm6 :227:	my ($tag, $real-value);
Altai-man/perl6-Java-Generate …/03-operators.t :9:	my ($left, $right);
Altai-man/perl6-Java-Generate …/04-interface.t :13:	my ($code, $signature, @methods);
Altai-man/perl6-Java-Generate …/06-variables.t :12:	my (@statements, $method);
Bailador/Bailador …/README.md :366:	% my ($name, $something) = @_;
Bailador/Bailador …/404.xx :1:	% my ($h) = @_;
Bailador/Bailador …/500.xx :1:	% my ($h) = @_;
Bailador/Bailador …/tmpl.tt :1:	% my ($h) = @_;
Bailador/Bailador …/default.tt :1:	% my ($h) = @_;
Bailador/Bailador …/other.tt :1:	% my ($h) = @_;
Bailador/Bailador …/main.tt :1:	% my (%h) = @_;
Bailador/Bailador …/index.tt :1:	% my ($h) = @_;
Bailador/Bailador …/Configuration.pm :111:	my ( $k, $v ) = $p . split(/<[:=]>/);
Bailador/Bailador …/Request.pm :142:	my ($name, $value) = $cookie.trim.split(/\s*\=\s*/, 2);
Bailador/Bailador …/Sessions.pm :39:	my ($data, $hmac) = $unchecked-session-id.split(/\-\-/, 2);
Bailador/Bailador …/error.template :1:	% my ($exception, $request) = @_;
Bailador/Bailador …/index.html :1:	% my ($h) = @_;
Bailador/Bailador …/09-OO-nested-routes.t :63:	my ($session-cookie-name, $value) = $response[1][1].value.trim.split(/\s*\=\s*/, 2);
Cofyc/perl6-redis …/Redis.pm :79:	my ($key, $value) = $l.split(":");
Cofyc/perl6-redis …/Redis.pm :180:	my ($flag, $response) = $first-line.substr(0, 1), $first-line.substr(1);
CurtTilmes/perl6-dbi-async …/Async.pm :47:	my ($promise, $query, @params) = $_;
CurtTilmes/perl6-eredis …/Eredis.pm :214:	my ($host, $port) = $hostport.split(':');
CurtTilmes/perl6-eredis …/Async.pm :102:	my ($host, $port) = .split(':');
CurtTilmes/perl6-libcurl …/Easy.pm6 :438:	my ($code, $type) = %opts{$option};
CurtTilmes/perl6-libcurl …/Easy.pm6 :546:	my ($code, $codelength) = %formfields{$field};
CurtTilmes/perl6-libcurl …/Easy.pm6 :617:	my ($code, $type) = %infofields{$info};
CurtTilmes/perl6-libcurl …/Multi.pm6 :39:	my ($code, $type) = %opts{$option};
Gnouc/p6-linux-process-signalinfo …/SignalInfo.pm :22:	my ($type, $value) = $line.split(':');
Juerd/p6-mqtt …/regex.t :10:	my ($regex, $filter, $topic);
Juerd/p6-mqtt …/regex.t :30:	my ($regex, $filter, $topic);
Juerd/p6-mqtt …/regex.t :53:	my ($regex, $filter, $topic);
Juerd/p6-mqtt …/regex.t :142:	my ($pattern, $match) = @_;
LLFourn/p6-CompUnit-Util …/Util.pm6 :24:	my ($first,@parts) = $path.split('::');
LLFourn/p6-CompUnit-Util …/Util.pm6 :36:	my ($first,@parts) = $path.split('::');
LLFourn/p6-CompUnit-Util …/Util.pm6 :78:	my ($key,*@path) = $path.split('::');
Leont/build-graph6 …/Graph.pm :187:	my ($command, Str @arguments) = $!graph.expand(%options, @!action);
Leont/build-graph6 …/Graph.pm :189:	my ($plugin-name, $subcommand) = $command.split('/', 2);
Leont/build-graph6 …/Graph.pm :255:	my ($dirs, $file) = $*SPEC.splitpath($filename)[1,2];
Leont/build-graph6 …/Graph.pm :282:	my ($command, Str @arguments) = $!graph.expand({ :$source }, @!trans);
Leont/build-graph6 …/Graph.pm :283:	my ($plugin-name, $subcommand) = $command.split('/', 2);
Leont/build-graph6 …/Graph.pm :314:	my ($plugin, $subcommand) = $command ~~ / ^ (<[^/]>+) \/ (.*) / ?? ($!graph.lookup-plugin($1), $2) !! (self, $command);
Leont/build-graph6 …/Graph.pm :319:	my ($plugin, $subtrans) = $trans ~~ / ^ (<[^/]>+) \/ (.*) / ?? ($!graph.lookup-plugin($1), $2) !! (self, $trans);
MARTIMM/mongo-perl6-driver …/find.t :11:	my (@documents, $cursor);
MARTIMM/mongo-perl6-driver …/Collection.pm6 :484:	my ( $k, $v) = $item.kv;
MadcapJake/Test-Lab …/020-experiment.t :107:	my ($last, @runs);
MadcapJake/Test-Lab …/020-experiment.t :153:	my (\op, \exception) = $ex.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :223:	my (\op, \ex) = $experiment.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :240:	my (\op, \ex) = $experiment.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :256:	my (\op, \ex) = $experiment.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :287:	my (\op, \ex) = $experiment.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :298:	my ($candidate-ran, $run-check-ran) = False xx 2;
MadcapJake/Test-Lab …/020-experiment.t :311:	my ($candidate-ran, $run-check-ran) = False xx 2;
MadcapJake/Test-Lab …/020-experiment.t :332:	my ($*ex, $*a, $*b) = prep();
MadcapJake/Test-Lab …/020-experiment.t :352:	my ($called-one, $called-two, $called-three) = False xx 3;
MadcapJake/Test-Lab …/020-experiment.t :363:	my ($called-one, $called-two, $called-three) = False xx 3;
MadcapJake/Test-Lab …/020-experiment.t :376:	my (\op, \exception) = $*ex.exceptions.pop;
MadcapJake/Test-Lab …/020-experiment.t :529:	my ($cont-ok, $cand-ok, $before) = False xx 2;
MattOates/Stats …/Stats.pm6 :71:	my ($q1,Any,$q2) = quartiles($x);
MattOates/Text--Emotion …/emobot :60:	my ($command, @args) = $message.split(/\s/);
MattOates/Text--Emotion …/emobot :84:	my ($person) = @args;
MattOates/Text--Emotion …/emobot :106:	my ($person) = @args;
MattOates/Text--Emotion …/emobot :122:	my ($person) = @args;
MattOates/Text--Emotion …/emobot :137:	my ($person) = @args;
Perl6-Noise-Gang/Audio-PortAudio …/play-wav :57:	my ( $buf, $frames) = $in-file.read-float(512, :raw);
PostCocoon/P6-Url …/Url.pm6 :81:	my ($key, $value) = $v.split("=", 2);
PowellDean/Locale-Codes-Country …/Country.pm6 :21:	my ($code2, $code3, $codeNum, $country) = .split(":");
Skarsnik/gptrixie …/gptrixie :105:	my ($enum-name, $enum-pattern) := $define-enum.split(':');
Skarsnik/nativecall-typediag …/TypeDiag.pm6 :167:	my ($cfilename, $cfileh) = tempfile("********.c");
Skarsnik/nativecall-typediag …/TypeDiag.pm6 :169:	my ($execfilename, $execfileh) = tempfile;
Takadonet/Algorithm--Diff …/diff.pl :33:	my ($sign, $lineno, $text) = @chunk;
Takadonet/Algorithm--Diff …/Diff.pm :123:	my ( $aStart, $aFinish ) = ( 0, +@a-1 );
Takadonet/Algorithm--Diff …/Diff.pm :124:	my ( $bStart, $bFinish ) = ( 0, +@b-1 );
Takadonet/Algorithm--Diff …/Diff.pm :126:	my ( $prunedCount, %bMatches ) = ( 0, %({}) );
Takadonet/Algorithm--Diff …/Diff.pm :174:	my ( @thresh, @links, $ai );
Takadonet/Algorithm--Diff …/Diff.pm :241:	my ( $lastA, $lastB, $bi ) = ( +@a-1, +@b-1, 0 );
Takadonet/Algorithm--Diff …/Diff.pm :310:	my ( $lastA, $lastB ) = ( +@a-1, +@b-1);
Takadonet/Algorithm--Diff …/Diff.pm :311:	my ( $bi, $ai, $ma ) = ( 0, 0, -1 );
Takadonet/Algorithm--Diff …/Diff.pm :431:	my ( $am, $bm ) = LCSidx( @a, @b, &keyGen );
Takadonet/Algorithm--Diff …/Diff.pm :435:	my ( $ai, $bi ) = ( 0, 0 );
Takadonet/Algorithm--Diff …/Diff.pm :458:	my ( @retval, @hunk );
Takadonet/Algorithm--Diff …/Diff.pm :645:	# my( $us )= @_;
Takadonet/Algorithm--Diff …/Diff.pm :676:	# my( $base, $name, $seq )= ( $1, $2, $3 );
Takadonet/Algorithm--Diff …/Diff.pm :881:	my( $idx1, $idx2 ) = LCSidx( @seq1, @seq2 );
Takadonet/Algorithm--Diff …/base.t :8:	my ($h, $i);
Takadonet/Algorithm--Diff …/base.t :61:	my ( @matchedA, @matchedB, @discardsA, @discardsB, $finishedA, $finishedB );
Takadonet/Algorithm--Diff …/base.t :65:	my ( $a, $b ) = @_;
Takadonet/Algorithm--Diff …/base.t :72:	my ( $a, $b ) = @_;
Takadonet/Algorithm--Diff …/base.t :78:	my ( $a, $b ) = @_;
Takadonet/Algorithm--Diff …/base.t :84:	my ( $a, $b ) = @_;
Takadonet/Algorithm--Diff …/base.t :90:	my ( $a, $b ) = @_;
Takadonet/Algorithm--Diff …/base.t :208:	my ( $a, $b, $check ) = @group;
Takadonet/Algorithm--Diff …/oo.t :13:	my ( $a, $b, $hunks );
Takadonet/Algorithm--Diff …/oo.t :106:	my ( @A, @B );
TiMBuS/Net--IRC …/Help.pm :12:	my (%modules, %commands);
Tux/CSV …/090-hooks.txt :6:	my ($c, $av) = @_;
Tux/CSV …/090-hooks.txt :11:	my ($c, $av) = @_;
Tux/CSV …/bugs.pl :30:	my ($class, $t, $rt) = @_;
Tux/CSV …/bugs.pl :40:	my ($re, $p, @arg) = @_;
Tux/CSV …/CSV.pod6 :2192:	my ($c, $s);
Tux/CSV …/79_callbacks.t :170:	my ($c, $av) = @_;
Tux/CSV …/79_callbacks.t :175:	my ($c, $av) = @_;
Tux/CSV …/time-twice.pl :31:	my ($s, $t) = m/^(.+?)\s+([0-9][.0-9]+)$/ or next;
Tux/CSV …/time.pl :112:	my ($v, $script, $file, @args) = @_;
Tux/CSV …/time.pl :113:	my ($ext, $exe, @arg) = @{$lang{$v}};
Tux/CSV …/time.pl :138:	my ($v, $irc, $script, $modules, @args) = @$_;
Tux/CSV …/time.pl :144:	my ($ext, $exe, @arg) = @{$lang{$v}};
Tux/CSV …/time.pl :171:	my ($run, $i) = runfrom ($v, $rs, $fn, @args);
Tux/CSV …/time.pl :234:	my ($script, $s_script, $i, $run, $start, $exe, $modules, @args) = @$_;
Tux/CSV …/time.pl :239:	my ($s_run, $s_run2, $s_runn) = map { $i eq "FAIL"
Uladox/Editscr-Uggedit …/Uggedit.pm :165:	my ($codeFile, $codeHandle) = tempfile;
Uladox/Editscr-Uggedit …/Uggedit.pm :166:	my ($varFile, $varHandle ) = tempfile;
Uladox/Editscr-Uggedit …/Uggedit.pm :177:	my ($readVarName, $readVarValue) =
Util/Perl6-Math-Quaternion …/Quaternion.pm6 :67:	my ( $r, $i, $j, $k ) = $b.coeffs;
Util/Perl6-Math-Quaternion …/is_bool.t :37:	my ( $expected, $q_pair ) = $d_aref.[ $i, *-1 ];
Util/Perl6-Math-Quaternion …/is_bool.t :38:	my ( $q_name, $q ) = $q_pair.kv;
Util/Perl6-Math-Quaternion …/math_ops.t :64:	my ( $r, $i, $j, $k ) = four_quats(1);
Xliff/p6-RandomColor …/RandomColor.pm6 :61:	my ($sMin, $sMax) = ($saturationRange.min, $saturationRange.max);
Xliff/p6-RandomColor …/RandomColor.pm6 :71:	my ($bMin, $bMax) = ( self.getMinimumBrightness($h, $s), 100 );
Xliff/p6-RandomColor …/RandomColor.pm6 :108:	my ($s1, $v1) = $lowerBounds[$_];
Xliff/p6-RandomColor …/RandomColor.pm6 :109:	my ($s2, $v2) = $lowerBounds[$_ + 1];
Xliff/p6-RandomColor …/RandomColor.pm6 :152:	my ($min, $max) = ( @range[0] // 0, @range[1] // 1 );
Xliff/p6-RandomColor …/RandomColor.pm6 :207:	my ($h, $s, $v) = ($hsv[0], $hsv[1] / 100, $hsv[2] / 100);
Xliff/p6-RandomColor …/RandomColor.pm6 :218:	my ($r, $g, $b) = (256 xx 3);
Xliff/p6-RandomColor …/RandomColor.pm6 :259:	my ($h, $s, $v) = ($hsv[0], $hsv[1] / 100, $hsv[2] / 100);
YellowApple/p6-GLFW …/Cursor.pm6 :18:	my (int32 $x, int32 $y) = $hotspot;
YellowApple/p6-GLFW …/Window.pm6 :63:	my (int32 $x, int32 $y) = $pos;
YellowApple/p6-GLFW …/Window.pm6 :74:	my (int32 $width, int32 $height) = $size;
YellowApple/p6-GLFW …/Window.pm6 :91:	my ($min, $max) = $limits;
YellowApple/p6-GLFW …/Window.pm6 :92:	my ($min-w, $min-h) = $min;
YellowApple/p6-GLFW …/Window.pm6 :93:	my ($max-w, $max-h) = $max;
YellowApple/p6-GLFW …/Window.pm6 :106:	my (int32 $numerator, int32 $denominator) = $ratio;
YellowApple/p6-GLFW …/Window.pm6 :122:	my (GLFW::Monitor $m, $params) = $args;
YellowApple/p6-GLFW …/Window.pm6 :123:	my ($pos, $size, int32 $r) = $params;
YellowApple/p6-GLFW …/Window.pm6 :124:	my (int32 $x, int32 $y) = $pos;
YellowApple/p6-GLFW …/Window.pm6 :125:	my (int32 $w, int32 $h) = $size;
YellowApple/p6-GLFW …/Window.pm6 :146:	my (int32 $width, int32 $height);
YellowApple/p6-GLFW …/Window.pm6 :153:	my (int32 $left, int32 $top, int32 $right, int32 $bottom);
YellowApple/p6-GLFW …/Window.pm6 :193:	my (num64 $x, num64 $y);
YellowApple/p6-GLFW …/Window.pm6 :198:	my (num64 $x, num64 $y) = $pos;
ab5tract/Terminal-Print …/attacks.p6 :102:	my ($x, $y) = self.w div 2, self.h div 2;
ab5tract/Terminal-Print …/attacks.p6 :471:	my ($phase, $pct) = self.phase($.rel.time, @times);
ab5tract/Terminal-Print …/mandelbrot-pixels.p6 :108:	my ($x1, $x2) = $x-margin.floor, ($.w - 1 - $x-margin).floor;
ab5tract/Terminal-Print …/mandelbrot-pixels.p6 :109:	my ($y1, $y2) = $y-margin.floor, ($.h - 1 - $y-margin).floor;
ab5tract/Terminal-Print …/mandelbrot.p6 :90:	my ($x1, $x2) = $x-margin.floor, ($w - 1 - $x-margin).floor;
ab5tract/Terminal-Print …/mandelbrot.p6 :91:	my ($y1, $y2) = $y-margin.floor, ($h - 1 - $y-margin).floor;
ab5tract/Terminal-Print …/rpg-ui.p6 :275:	my ($x, $y) = @indices[$frame % @indices][0,1];
ab5tract/Terminal-Print …/rpg-ui.p6 :1320:	my ($phase, $pct) = self.phase($.rel.time + .5e0, @times);
ab5tract/Terminal-Print …/rpg-ui.p6 :1401:	my ($x, $y, $w, $h)
ab5tract/Terminal-Print …/rpg-ui.p6 :1572:	my ($game, $ui);
ab5tract/Terminal-Print …/tris.p6 :47:	my ($mino, $next-mino) = %minos.keys.pick xx 2;
ab5tract/Terminal-Print …/tris.p6 :206:	my ($left, $right) = $x-off * 2, ($x-off + w) * 2 - 1;
ab5tract/Terminal-Print …/Commands.pm6 :73:	my ($pre, $mid, $post) = $0, $2, $4;
ab5tract/Terminal-Print …/Commands.pm6 :137:	my ($clear, $rmcup, $cnorm) = tput("clear"), tput("rmcup"), tput("cnorm");
ab5tract/Terminal-Print …/DecodedInput.pm6 :169:	my ($encoded, $x, $y, $pressed) = +$0, $1 - 1, $2 - 1, ($3 eq 'M');
ab5tract/Terminal-Print …/DecodedInput.pm6 :170:	my ($shift, $meta, $control, $motion)
ab5tract/Terminal-Print …/Grid.pm6 :135:	my ($x1, $y1, $w, $h)
ab5tract/Terminal-Print …/Grid.pm6 :156:	my ($x1, $y1, $w, $h) = self.copy-from($grid, $x, $y);
adaptiveoptics/P6-Finance-GDAX-API …/API.pm6 :86:	my ($k, $v) = $line.split: ':';
adaptiveoptics/P6-Finance-GDAX-API …/020-api.t :27:	my ($fn, $fh) = tempfile;
ajs/perl6-Math-Sequences …/Integer.pm :213:	my ($q, $r, $t) = 1, 180, 60;
ajs/perl6-Math-Sequences …/Integer.pm :215:	my ($u,$y) =
araraloren/Net-FTP …/Buffer.pm6 :6:	my ($l, $r, $len) = (0, 0, +$buf - +$sep);
araraloren/Net-FTP …/Control.pm6 :167:	my ($code, $msg, $line);
araraloren/Net-FTP …/Format.pm6 :251:	my ($year, $month, $day) = ($y, $m, $d);
araraloren/perl6-app-findsource …/fs :115:	my (@t1, @t2);
araraloren/perl6-app-findsource …/fs :117:	my ($debug, $only, $ignore-case) = ($os<d>, $os<only>, $os<i>);
araraloren/perl6-app-snippet …/snippet :7:	my (@compilers, @interfaces);
araraloren/perl6-getopt-advance …/Advance.adoc :188:	my ($optset, $option, $v) = @(v);
araraloren/perl6-getopt-advance …/Advance.adoc :289:	my ($optset, $no, $v) = @(v);
araraloren/perl6-getopt-advance …/Helper.pm6 :44:	my ($usage, %optionref) = ("", %!option);
araraloren/perl6-getopt-advance …/Helper.pm6 :105:	my ($front, @pos);
araraloren/perl6-getopt-advance …/Helper.pm6 :128:	my (@front, @pos);
araraloren/perl6-getopt-advance …/Helper.pm6 :235:	my ($cmd, $pos, $opt) = (+@cmdu, +@posu, +@annotation);
araraloren/perl6-getopt-advance …/Helper.pm6 :263:	my ($cmd, $pos, $opt) = (0, 0, 0);
araraloren/perl6-getopt-advance …/Parser.pm6 :394:	my (%order, @sorted);
araraloren/perl6-getopt-advance …/Parser.pm6 :644:	my ($matched, $skip) = (True, False);
araraloren/perl6-getopt-advance …/Utils.pm6 :91:	my ($matched, $skip) = (True, False);
araraloren/perl6-getopt-advance …/Utils.pm6 :182:	my ($f, $s) = ($optset.has(.[0], 'b'), $optset.has(.[1], 'b'));
araraloren/perl6-getopt-advance …/create-symbol-directory.p6 :71:	my ($dir, $out) = ($dira.value.IO, $os<output>.IO);
araraloren/perl6-getopt-advance …/fetch-picture.p6 :142:	my ($cmd, $file) = ("", "{opts<o>.IO.absolute}/{dir}/{count}.{opts<e>}");
araraloren/perl6-getopt-advance …/fetch-picture.p6 :163:	my ($dir, $content, $npage, $beg, $end, $count);
araraloren/perl6-getopt-advance …/make-cpan-pack.p6 :56:	my ($ver, $debug) = ($os<ver> // "", $os<debug>);
araraloren/perl6-getopt-advance …/make-cpan-pack.p6 :58:	my ($in, $out) = ($dir.value.IO, ($os<out> // "").IO);
araraloren/perl6-getopt-advance …/make-cpan-pack.p6 :77:	my ($name, $version) = (%meta<name>, %meta<version>);
araraloren/perl6-getopt-advance …/xcp.p6 :28:	my ($src, $dst) = (~$0, ~$1);
araraloren/perl6-getopt-advance …/xcp.p6 :29:	my ($ss, $ds, $bds) = (getFileSize($src), 1, 0);
araraloren/perl6-getopt-advance …/02-option.t :50:	my ($os, $opt, $v) = @$_;
araraloren/perl6-getopt-advance …/02-option.t :60:	my ($, $, $v) = @$_;
araraloren/perl6-getopt-advance …/03-types.t :233:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/03-types.t :257:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/03-types.t :276:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/03-types.t :297:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/03-types.t :325:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/03-types.t :344:	my ($shoptname, $lgoptname) = ('a', "action");
araraloren/perl6-getopt-advance …/05-main.t :16:	my ($os, $main, @v) := @$v;
araraloren/perl6-getopt-advance …/07-pos.t :114:	my ($os, $pos, $v) = @(v);
araraloren/perl6-terminal-table …/README.adoc :211:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
araraloren/perl6-terminal-table …/README.adoc :212:	my ($rx, $ry) = ($x * 2, $y * 2);
araraloren/perl6-terminal-table …/README.zh.adoc :169:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
araraloren/perl6-terminal-table …/README.zh.adoc :170:	my ($rx, $ry) = ($x * 2, $y * 2);
araraloren/perl6-terminal-table …/LightWrap.pm6 :57:	my ($key, $value) = ($/.Str, noexpand-width($/.Str));
araraloren/perl6-terminal-table …/irregular-shape.p6 :16:	my ($r, $c) = ($g.row-count() * 2, $g.col-count($x) * 2);
araraloren/perl6-terminal-table …/irregular-shape.p6 :17:	my ($rx, $ry) = ($x * 2, $y * 2);
araraloren/perl6-terminal-table …/irregular-shape.p6 :56:	my ($x, $y) = ((rand * 100).floor % 4, (rand * 100).floor % 6);
araraloren/perl6-terminal-table …/04-style.t :10:	my (@all-corner, @all-lines);
arnsholt/Algorithm-Viterbi …/Viterbi.pm :73:	my ($max-p, $i) = (0, 0);
arnsholt/Algorithm-Viterbi …/Viterbi.pm :98:	my ($max-p, $i) = (0, 0);
arnsholt/Algorithm-Viterbi …/Viterbi.pm :140:	my ($observation, $tag) = ($pair.key, $pair.value);
astj/p6-SQL-NamedPlaceholder …/README.md :13:	my ($sql, $bind) = bind-named(q[
astj/p6-SQL-NamedPlaceholder …/NamedPlaceholder.pm6 :32:	my ($sql, $bind) = bind-named(q[
astj/p6-SQL-NamedPlaceholder …/01-basic.t :6:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => 3, limit => 5 });
astj/p6-SQL-NamedPlaceholder …/02-extend.t :8:	my ($sql, $bind) = bind-named(qq:to/EOQ/, { blog_id => 3, limit => 5 });
astj/p6-SQL-NamedPlaceholder …/03-array.t :7:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => [1,2,3] });
astj/p6-SQL-NamedPlaceholder …/03-array.t :23:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog_id => [Nil] });
astj/p6-SQL-NamedPlaceholder …/04-name-id.t :6:	my ($sql, $bind) = bind-named(q{ UPDATE foo SET a = '2016-02-02 00:00:00' }, { });
astj/p6-SQL-NamedPlaceholder …/06-hyphen.t :6:	my ($sql, $bind) = bind-named(q:to/EOQ/, { blog-status => 1, blog_id => 3, limit => 5 });
atweiden/config-toml …/02-dumper.t :136:	my (%valid, %invalid);
atweiden/crane …/README.md :206:	:my("MTV")
atweiden/sustenance …/Sustenance.pm6 :186:	my (Calories:D $calories,
atweiden/sustenance …/Sustenance.pm6 :201:	my (Calories:D $calories,
atweiden/sustenance …/ParseTree.pm6 :102:	my (Str:D $h, Str:D $m, Str:D $s) = $t.split(':');
atweiden/sustenance …/ParseTree.pm6 :296:	my (UInt:D $year, UInt:D $month, UInt:D $day) =
atweiden/sustenance …/ParseTree.pm6 :298:	my (UInt:D $hour, UInt:D $minute, Rat:D $second) =
atweiden/sustenance …/ParseTree.pm6 :305:	my (UInt:D $year, UInt:D $month, UInt:D $day) =
azawawi/farabi6 …/test_repl.pl :11:	my ($out, $result);
azawawi/farabi6 …/Editor.pm6 :33:	my ($filename,$filehandle) = tempfile(:!unlink);
azawawi/farabi6 …/Editor.pm6 :102:	my ($status, $text);
azawawi/farabi6 …/Editor.pm6 :149:	my ($filename,$filehandle) = tempfile(:!unlink);
azawawi/farabi6 …/Editor.pm6 :200:	my ($filename,$filehandle) = tempfile(:!unlink);
azawawi/farabi6 …/Editor.pm6 :533:	my ($filename,$filehandle) = tempfile(:!unlink);
azawawi/farabi6 …/Editor.pm6 :569:	my ($file, $from, $to);
azawawi/farabi6 …/Editor.pm6 :589:	my ($file, $from, $to, $code) = ~$0, ~$1, ~$2, ~$3;
azawawi/farabi6 …/Editor.pm6 :693:	my ($stdout, $stderr, $ranges) = ('', '', []);
azawawi/perl6-browser-open …/Open.pm6 :96:	my ($osname, $cmd, $exact, $no_search) = @$spec;
azawawi/perl6-file-zip …/Zip.pm6 :70:	my (
azawawi/perl6-graphics-plplot …/ex02.p6 :47:	my ($vmin, $vmax) = (0.1, 0.9);
azawawi/perl6-graphics-plplot …/ex02.p6 :90:	my ($lmin, $lmax) = (0.15, 0.85);
azawawi/perl6-graphics-plplot …/ex02.p6 :115:	my ($red, $green, $blue) = $plot.hls-to-rgb($h, $l, $s);
azawawi/perl6-graphics-plplot …/ex00.p6 :20:	my ($xmin, $xmax, $ymin, $ymax) = (0.0, 1.0, 0.0, 100);
azawawi/perl6-graphics-plplot …/ex02.p6 :87:	my ($lmin, $lmax) = (0.15, 0.85);
azawawi/perl6-graphics-plplot …/ex02.p6 :109:	my (num64 $r1, num64 $g1, num64 $b1);
azawawi/perl6-graphics-plplot …/ex02.p6 :120:	my (int32 $red, int32 $green, int32 $blue);
azawawi/perl6-graphics-plplot …/ex11.p6 :70:	my ($zmin, $zmax) = (Inf, -Inf);
azawawi/perl6-graphics-plplot …/PLplot.pm6 :187:	my (num64 $r, num64 $g, num64 $b);
azawawi/perl6-graphics-plplot …/PLplot.pm6 :193:	my (int32 $red, int32 $green, int32 $blue);
azawawi/perl6-gtk-scintilla …/perl-test-5220delta.pl :126:	my(undef, $card_num, (undef)x3, $count) = split /:/;
azawawi/perl6-gtk-scintilla …/catch.hpp :686:	static TrueIfSizeable<sizeof((*(std::ostream*)0) << *((T2 const*)0))> dummy(T2*);
azawawi/perl6-gtk-scintilla …/catch.hpp :687:	static FalseType dummy(...);
azawawi/perl6-gtk-scintilla …/catch.hpp :690:	typedef SizedIf<sizeof(dummy((T*)0))> type;
azawawi/perl6-gtk-scintilla …/catch.hpp :2988:	virtual void dummy();
azawawi/perl6-gtk-scintilla …/catch.hpp :8543:	void Config::dummy() {}
azawawi/perl6-ncurses …/02-starfield.pl6 :14:	my ($screen-y, $screen-x) = $o.max-yx;
azawawi/perl6-opencv …/02-drawing.pl6 :13:	my ($width, $height) = ($img.cols, $img.rows);
azawawi/perl6-selenium-webdriver …/Firefox.pm6 :26:	my ($directory, $dirhandle) = tempdir;
azawawi/perl6-terminal-caca …/04-cube.pl6 :57:	my ($px, $py) = to_2d($x, $y, $z);
azawawi/perl6-terminal-caca …/04-cube.pl6 :98:	my ($px, $py, $z) = transform-vertex(@point, $angle);
azawawi/perl6-terminal-caca …/05-dither.pl6 :10:	my ($width, $height) = ($fh.get.split(" "));
azawawi/perl6-terminal-caca …/05-dither.pl6 :24:	my ($width, $height, $depth, $data) = read-ppm-image("camelia-logo.ppm");
azawawi/perl6-terminal-caca …/08-sphere.pl6 :65:	my ($x, $y, $z) = polar-to-cartesian($r, $meridian, $parallel);
azawawi/perl6-terminal-caca …/08-sphere.pl6 :81:	my ($px, $py) = to_2d($x, $y, $z);
azawawi/perl6-terminal-caca …/Caca.pm6 :353:	my ($ww, $wh) = self.size;
bbkr/GeoIP2 …/GeoIP2.pm :117:	my ( $left-pointer, $right-pointer ) = self!read-node( :$index );
bbkr/GeoIP2 …/GeoIP2.pm :169:	my ( $left-pointer, $right-pointer );
bbkr/jsonrpc …/00-client.t :10:	my ($rpc, $name, @responses, $responses);
bbkr/jsonrpc …/00-client.t :74:	try { $rpc.dummy( ) };
bbkr/jsonrpc …/00-client.t :83:	try { $rpc.dummy( ) };
bbkr/jsonrpc …/00-client.t :96:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/00-client.t :118:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/00-client.t :135:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/00-client.t :136:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/00-client.t :137:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/00-client.t :170:	$rpc.'rpc.batch'( ).dummy( );
bbkr/jsonrpc …/01-server.t :243:	my ($got, $expected) = map { .defined ?? from-json( $_ ) !! $_ },
bbkr/text_markov …/basic.t :12:	my ( $mc, %stats );
bduggan/p6-jupyter-kernel …/Kernel.pm6 :140:	my (Int:D $cursor_start, Int:D $cursor_end, $completions)
bduggan/p6-jupyter-kernel …/Kernel.pm6 :168:	my ($comm_id,$data,$name) = $msg<content><comm_id data target_name>;
bduggan/p6-jupyter-kernel …/Kernel.pm6 :179:	my ($comm_id, $data) = $msg<content><comm_id data>;
bduggan/p6-jupyter-kernel …/04-completions.t :21:	my ($pos, $end, $completions) = $r.completions('sa', 2);
bduggan/p6-jupyter-kernel …/04-completions.t :73:	my ($pos,$end,$completions) = $r.completions('wp');
bduggan/p6-jupyter-kernel …/04-completions.t :77:	my ($pos,$end,$completions) = $r.completions('2');
bduggan/p6-jupyter-kernel …/05-autocomplete.t :21:	my ($pos,$offset,$atomic) = $c.complete('$a atomic','$a atomic'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :27:	my ($pos,$end,$beer) = $c.complete('some :beer','some :beer'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :34:	my ($pos,$end,$beer) = $c.complete('some :b','some :b'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :38:	my ($pos,$end,$got) = $c.complete(':less-than',':less-than'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :42:	my ($pos,$end,$got) = $c.complete(':less-than-or-equal',':less-than'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :46:	my ($pos,$end,$got) = $c.complete('say pi','say pi'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :50:	my ($pos,$end,$got) = $c.complete('pi','pi'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :54:	my ($pos,$end,$got) = $c.complete('tau','tau'.chars,Nil);
bduggan/p6-jupyter-kernel …/05-autocomplete.t :58:	my ($pos,$end,$got) = $c.complete('1..Inf','1..Inf'.chars,Nil);
bduggan/p6-log-async …/Async.pm6 :38:	my ($i) = @.taps.grep( { $_ eq $t }, :k );
bradclawsie/Context …/basic.t :129:	my ($before,$after);
bradclawsie/Net-IP-Parse …/Parse.pm6 :111:	my ($octets_part,$zone_id_part) = $addr.split: '%',2;
bradclawsie/Net-IP-Parse …/Parse.pm6 :121:	my (Str @left_words_strs, Str @right_words_strs);
bradclawsie/Net-IP-Parse …/Parse.pm6 :130:	my ($left_words_str,$right_words_str) = $octets_part.split: '::', 2;
bradclawsie/Net-IP-Parse …/Parse.pm6 :141:	my ($i,$j) = (0,15);
bradclawsie/Net-IP-Parse …/Parse.pm6 :148:	my ($l,$r) = word-bytes $word;
bradclawsie/Net-IP-Parse …/Parse.pm6 :182:	my ($i,$max_start,$max_end,$max_len,$start) = (0,0,0,0,-1);
bradclawsie/Net-IP-Parse …/Parse.pm6 :186:	my ($end,$len) = ($i,$i - $start);
bradclawsie/Net-IP-Parse …/Parse.pm6 :200:	my ($pre,$post) = ('','');
bradclawsie/WebService-AWS-V4 …/V4.pm6 :155:	my ($k,$v) = ($0,$1);
bradclawsie/WebService-AWS-V4 …/V4.pm6 :250:	my ($k,$v) = ($0,$1);
ccworld1000/CCChart …/CCChart.pm6 :144:	my ($firstX, $firstY) = @cs[$step];
ccworld1000/CCChart …/CCChart.pm6 :145:	my ($secondX, $secondY) = @cs[$step+1];
ccworld1000/CCChart …/CCChart.pm6 :239:	my ($sX, $sY) = @xyList[$index];
ccworld1000/CCColor …/README.md :39:	my ($r, $g, $b, $a) = hex2rgba($color);
ccworld1000/CCColor …/CCColor.pm6 :76:	my ($r, $g, $b, $a) = 0, 0, 0, 0;
ccworld1000/CCColor …/test.p6 :51:	my ($r, $g, $b, $a) = hex2rgba($color);
cedric-vincent/kains …/Commandline.pm6 :50:	my ($switch, $parameter);
cedric-vincent/kains …/Core.pm6 :66:	my ($new-uid, $old-uid) = getuid() xx 2;
cedric-vincent/kains …/Core.pm6 :67:	my ($new-gid, $old-gid) = getgid() xx 2;
cjfields/bioperl6 …/PrimarySeq.pm6 :339:	# my ($start, $end) = ($offset, self.length);
cjfields/bioperl6 …/Range.pm6 :36:	my ($s1, $s2) = ($!strand, $r.strand);
cjfields/bioperl6 …/Range.pm6 :122:	my ($start, $end, $strand) = ($int.start, $int.end, $int.strand);
cjfields/bioperl6 …/fasta.pm6 :44:	my ($header, $seq) = $chunk.split("\n", 2);
cjfields/bioperl6 …/fasta.pm6 :46:	my ($display_id, $desc) = $header.split(' ', 2);
cjfields/bioperl6 …/CodonTable.pm6 :187:	my ($id) = self.id;
cjfields/bioperl6 …/CodonTable.pm6 :188:	my (@aas, $p);
cjfields/bioperl6 …/CodonTable.pm6 :189:	my (@codons) = ();
cjfields/bioperl6 …/CodonTable.pm6 :277:	my ($id) = self.id;
cjfields/bioperl6 …/CodonTable.pm6 :329:	my ($i, $j, $k);
cjfields/bioperl6 …/FTLocationFactory.pm6 :38:	my ($beg, $mid, $end) = ($0.Str, $1.Str, $2);
cjfields/bioperl6 …/FTLocationFactory.pm6 :39:	my (@sublocs) = (split(',',$beg), $mid, split(',',$end));
cjfields/bioperl6 …/FTLocationFactory.pm6 :113:	my ($loc, $seqid);
cjfields/bioperl6 …/FTLocationFactory.pm6 :123:	my ($start, $end) = split(/\.\./, $locstr);
cjfields/bioperl6 …/FTLocationFactory.pm6 :156:	my ($start_num, $end_num) = ($start,$end);
cjfields/bioperl6 …/Fuzzy.pm6 :75:	my ($encode,$min,$max) = self!fuzzypointdecode(%params{'minstart'});
cjfields/bioperl6 …/Fuzzy.pm6 :82:	my ($encode,$min,$max) = self!fuzzypointdecode(%params{'maxend'});
cjfields/bioperl6 …/Fuzzy.pm6 :93:	my ($encode,$min,$max) = self!fuzzypointdecode($value);
cjfields/bioperl6 …/Fuzzy.pm6 :111:	my ($encode,$min,$max) = self!fuzzypointdecode($value);
cjfields/bioperl6 …/Fuzzy.pm6 :180:	my (%vals) = ( 'start' => self.start,
cjfields/bioperl6 …/Fuzzy.pm6 :189:	my (%strs) = ( 'start' => '',
cjfields/bioperl6 …/Fuzzy.pm6 :191:	my ($delimiter) = %FUZZYCODES{self.location_type};
cjfields/bioperl6 …/Fuzzy.pm6 :293:	my ($min,$max) = ($0.Str.Int,$1.Str.Int) unless (($0 eq '') && (!defined $1));
cjfields/bioperl6 …/Split.pm6 :206:	my ($strand, $lstrand);
cjfields/bioperl6 …/Lite.pm6 :153:	my ($start,$stop) = @($seg);
cjfields/bioperl6 …/Lite.pm6 :477:	# my ($self,$recurse,$parent_tree,$seenit,$force_id) = @_;
cjfields/bioperl6 …/Lite.pm6 :572:	# my ($tag_name,@tag_values) = @_;
cjfields/bioperl6 …/Location.t :33:	my ($loc) = $simple.each_Location();
cjfields/bioperl6 …/Lite.t :75:	my ($start,$end) = (@feature[0],@feature[1]);
cjfields/bioperl6 …/genbank.t :42:	# my ($cds) = grep { $_.primary_tag eq 'CDS' } $as.get_SeqFeatures();
cjfields/bioperl6 …/genbank.t :197:	# my ($ref) = $lasts.annotation.get_Annotations('reference');
cjfields/bioperl6 …/genbank.t :357:	# my ($tagname, $value) = (shift @tests, shift @tests);
cjfields/bioperl6 …/FTLocation.t :23:	my ($locstr, *@rest) = split("\t", $line);
cjfields/bioperl6 …/Range.t :251:	my ($r1, $r2) = @ranges[split(',',$set)];
cjfields/bioperl6 …/Pluggable.t :21:	my ($test, $count);
cjfields/bioperl6 …/Temp.t :11:	my (@cleaned, @kept);
cjfields/bioperl6 …/Temp.t :23:	my ($tfh,$tfile);
cjfields/bioperl6 …/Temp.t :91:	my ($tfile, $tfh) = $obj.tempfile(:suffix<.bioperl>);
cjfields/bioperl6 …/fasta.t :74:	# my ($file, $type) = ("test.$format", $format);
cjfields/bioperl6 …/FTLocationParser.t :17:	my ($locstr, *@rest) = split("\t", $line);
colomon/ABC …/abcoctave :31:	my ($note, $number) = to-note-and-number($basenote, $octave);
colomon/ABC …/abcoctave :32:	my ($new-note, $new-octave) = from-note-and-number($note, $number + $shift);
colomon/ABC …/Chord.pm :35:	my ($new-accidental, $new-note, $new-octave) = $pitch-changer($note-accidental, $note, "");
colomon/ABC …/Chord.pm :46:	my ($main-note, $main-accidental) = change-chord($.main-note, $.main-accidental);
colomon/ABC …/Chord.pm :47:	my ($bass-note, $bass-accidental) = change-chord($.bass-note, $.bass-accidental);
colomon/ABC …/Note.pm :29:	my ($new-accidental, $new-basenote, $new-octave) = $pitch-changer($.accidental, $.basenote, $.octave);
colomon/ABC …/10-utils.t :16:	my ($pitch, $symbol) = from-note-and-number($note, $octave-number);
colomon/ABC …/10-utils.t :17:	my ($computed-note, $computed-number) = to-note-and-number($pitch, $symbol);
colomon/Benchmark-Plot …/graph-bench.pl :7:	my ($rakudo, $benchmark, $time) = $line.split(/\s* "," \s*/);
colomon/Math-Polynomial …/Polynomial.pm :277:	my ($this_d, $that_d) = ($this.degree, $that.degree);
colomon/Math-Polynomial …/Polynomial.pm :293:	my ($d1, $d2) = ($this.new($this.coeff-one), $this.new);
colomon/Math-Polynomial …/Polynomial.pm :299:	my ($m1, $m2) = ($d2, $d1);
colomon/Math-Polynomial …/Polynomial.pm :301:	my ($div, $mod) = $this.divmod($that);
colomon/Math-Polynomial …/Polynomial.pm :310:	my ($d, $d2) = ($that.xgcd(self))[0, 2];
colomon/Math-Polynomial …/Polynomial.pm :336:	my ($quot, $rem) = self.divmod-root($root);
colomon/Math-Polynomial …/05_euclid.t :36:	my ($d, $d1, $d2, $m1, $m2) = $p.xgcd($q);
colomon/Math-Polynomial …/05_euclid.t :61:	# my ($this, $that) = @_;
colomon/Math-Polynomial …/09_linear_terms.t :78:	my ($p19, $p20) = $p.divmod-root(-3);
colomon/Math-Polynomial …/09_linear_terms.t :82:	my ($p21, $p22) = $p.divmod-root(-2);
colomon/Math-Polynomial …/09_linear_terms.t :86:	my ($p23, $p24) = $q.divmod-root(-3);
colomon/Math-Polynomial …/09_linear_terms.t :90:	my ($p25, $p26) = $q.divmod-root(-2);
colomon/Math-Polynomial …/09_linear_terms.t :94:	my ($p27, $p28) = $cp.divmod-root(-3);
colomon/Math-Polynomial …/09_linear_terms.t :98:	my ($p29, $p30) = $zp.divmod-root(-3);
colomon/io-prompter …/Prompter.pm :40:	my ($punct, $description, $match, $extractor)
colomon/io-prompter …/Prompter.pm :82:	my (%named, @positional, $eof);
colomon/io-prompter …/Prompter.pm :49:	my ($punct, $description, $match, $extractor)
colomon/io-prompter …/Prompter.pm :111:	my (%named, @positional);
cosimo/perl6-digest-md5 …/MD5.pm :42:	my ($A, $B, $C, $D) = @H;
croservices/cro-http-session-redis …/01-basic.t :61:	my ($res-a, $res-b) = await do for $client-a, $client-b -> $client {
cygx/p6-image-rgba-text …/Text.pm6 :45:	my ($img, $bytes);
cygx/p6-tinycc …/04-state.t :10:	my ($state, $error);
dagurval/perl6-gd-raw …/Raw.pm :284:	my ($x, $y) = (@p[$i].x, @p[$i].y);
dagurval/perl6-gd-raw …/Raw.pm :362:	my ($x1, $x2);
dagurval/perl6-gd-raw …/gdtest.pm6 :43:	my ($x, $y);
dagurval/perl6-gd-raw …/gdtest.pm6 :86:	my ($diff_a,$diff_r,$diff_g,$diff_b);
dagurval/perl6-gd-raw …/gdModesAndPalettes.t :17:	my ($major, $minor);
dagurval/perl6-gd-raw …/gdTrivialResize.t :84:	my ($major, $minor);
dagurval/perl6-image-resize …/01-resize.t :25:	my ($x, $y) = get-png-size($half);
dagurval/perl6-image-resize …/01-resize.t :38:	my ($x, $y) = get-png-size($sixfour);
dagurval/perl6-image-resize …/03-convert.t :22:	my ($x, $y) = get-png-size($png-img);
dagurval/perl6-image-resize …/04-scale.t :17:	my ($x, $y);
darrenf/p6-test-declare …/Declare.pm6 :198:	my ($stdout, $stderr, $stdin) = capture {
dginev/perl6-Lingua-EN-Sentence …/Sentence.pm6 :50:	my ($quoteless_text, Array[Str] $quotes) = hide_quotes($text);
dnmfarrell/Pod-Perl5 …/ToHTML.pm6 :40:	my ($leading_space, $text);
dnmfarrell/Pod-Perl5 …/ToHTML.pm6 :228:	my ($url, $text) = ("","");
dnmfarrell/Pod-Perl5 …/ToMarkdown.pm6 :197:	my ($url, $text) = ("","");
dnmfarrell/Pod-PerlTricks …/ToHTML.pm6 :246:	my ($url, $text) = ("","");
dnmfarrell/Pod-PerlTricks …/SampleArticle.html :35:	my($width, $value, $values, $letter) = @_;
dnmfarrell/Pod-PerlTricks …/SampleArticle.html :69:	my($width, $value, $values, $letter) = @_;
dnmfarrell/Pod-PerlTricks …/SampleArticle.html :134:	<pre>while( my( $index, $row ) = each @data ) {
dnmfarrell/Pod-PerlTricks …/SampleArticle.json :1:	{ "body" : "\"\\n\\n<p>How can I easily run the same tests on different data without duplicating a lot of code? If I follow my usual pattern, I start…
dnmfarrell/Pod-PerlTricks …/SampleArticle.pod :31:	my($width, $value, $values, $letter) = @_;
dnmfarrell/Pod-PerlTricks …/SampleArticle.pod :65:	my($width, $value, $values, $letter) = @_;
dnmfarrell/Pod-PerlTricks …/SampleArticle.pod :130:	while( my( $index, $row ) = each @data ) {
drforr/perl6-Perl6-Parser …/999-regression.t :143:	my ($x,@x);
drforr/perl6-Perl6-Parser …/999-regression.t :156:	my ($n,$k);
drforr/perl6-Perl6-Parser …/999-regression.t :157:	loop (my ($p, $f) = 2, 0; $f < $k && $p*$p <= $n; $p++) { }
drforr/perl6-Perl6-Parser …/999-regression.t :193:	my (@a,@b);
drforr/perl6-Perl6-Parser …/rosetta-1.t :89:	my ($yd, $ym, $xd, $xm) = ($y div n, $y mod n, $x div n, $x mod n);
drforr/perl6-Perl6-Parser …/rosetta-1.t :260:	my ( $x, $y ) = @empties.roll;
drforr/perl6-Perl6-Parser …/rosetta-a.t :27:	my ($a, $b) = $*IN.get.split(" ");
drforr/perl6-Perl6-Parser …/rosetta-a.t :350:	loop (my ($p, $f) = 2, 0; $f < $k && $p*$p <= $n; $p++) {
drforr/perl6-Perl6-Parser …/rosetta-a.t :451:	:my ($a,$b,$c,$d);
drforr/perl6-Perl6-Parser …/rosetta-a.t :576:	# my ($w, $h) = (400, 400);
drforr/perl6-Perl6-Parser …/rosetta-a.t :691:	my ($enc, $pow, %freq) = arithmethic_coding($str, $radix);
drforr/perl6-Perl6-Parser …/rosetta-a.t :1021:	my ($mag,$ang) = $c.polar;
drforr/perl6-Perl6-Parser …/rosetta-b.t :179:	my ($b,$a) = sort +*.coeff, $x, $y;
drforr/perl6-Perl6-Parser …/rosetta-b.t :214:	my ($w, $h) = (640, 640);
drforr/perl6-Perl6-Parser …/rosetta-b.t :218:	my ($x, $y) = (0, 0);
drforr/perl6-Perl6-Parser …/rosetta-b.t :642:	my ($x, $y) = 0, $r;
drforr/perl6-Perl6-Parser …/rosetta-b.t :942:	my ($bulls, $cows) = 0, 0;
drforr/perl6-Perl6-Parser …/rosetta-b.t :963:	my ($bulls, $cows) = read-score;
drforr/perl6-readline …/02-base.t :104:	my ( $rows, $cols ) = ( 80, 24 );
drforr/perl6-readline …/02-base.t :116:	my ( $start, $end ) = ( 1, 2 );
drforr/perl6-readline …/02-base.t :216:	my ( $from, $to ) = ( 1, 2 );
drforr/perl6-readline …/02-base.t :347:	my ( $start, $end ) = ( 1, 2 );
edumentab/p6-app-moarvm-debug …/moar-remote :136:	my (@classes, %to-replace, @to-forget);
edumentab/p6-moarvm-remote …/03-thread-lifecycle.t :40:	my ($T0-id, $T1-id);
fayland/perl6-Business-CreditCard …/tests.t :66:	my ($num, $rst) = $tv.list;
fayland/perl6-Lingua-Unihan …/update_lingua_unihan.pl6 :15:	my ($code_point, $field_type, $value) = $line.split(/\s+/, 3);
fayland/perl6-Lingua-Unihan …/Unihan.pm6 :21:	my ($v) = %sths{$field_type}.fetchrow_array;
fayland/perl6-WebService-GitHub …/Response.pm :23:	my ($link, $rel) = ($part ~~ /\<(.+)\>\;\s*rel\=\"(\w+)\"/)[0, 1];
fayland/perl6-WebService-GitHub …/30-cache.t :8:	my ($gh, $res, $user, $old_etag, $old_date);
finanalyst/pod-cached …/Cached.pm6 :278:	my ($handle , $error, $added);
finanalyst/pod-cached …/100-heavy-duty.t :27:	my ( $start1, $start2, $stop1, $stop2);
gabrielash/perl6-zmq …/Version.pm :33:	my ($mj, $mn, $pt ) = ($major, $minor, $patch);
gabrielash/perl6-zmq …/07.t :32:	my ($p1, $p2) = ('Héllo ', 'Wörld');
gabrielash/perl6-zmq …/07.t :33:	my ($l1, $l2) = ($p1.encode('UTF-8').bytes, $p2.encode('UTF-8').bytes);
gabrielash/perl6-zmq …/10.t :34:	my ($p1, $p2) = ('Héllo ', 'Wörld');
gabrielash/perl6-zmq …/10.t :35:	my ($l1, $l2) = ($p1.encode('ISO-8859-1').bytes, $p2.encode('ISO-8859-1').bytes);
gfldex/http-server-simple …/Simple.pm6 :46:	my ($method, $uri, $protocol) = self.parse_request;
gfldex/http-server-simple …/Simple.pm6 :48:	my ( $path, $query-string ) = $uri.split('?',2);
gfldex/http-server-simple …/Simple.pm6 :124:	my ( $key, $value ) = $line.split( ': ' );
gfldex/perl6-meta6-bin …/bin.pm6 :202:	my ($owner, $repo) = $module-url.split('/')[3,4];
gfldex/perl6-meta6-bin …/bin.pm6 :222:	my ($n, $v) = $s.split(':ver');
gfldex/perl6-meta6-bin …/bin.pm6 :277:	my ($parent-owner, $parent) = github-get-repo($github-user, $repo)<parent><full_name>.split('/');
gfldex/perl6-meta6-bin …/bin.pm6 :285:	my ($owner, $repo) = ($module
gfldex/perl6-meta6-bin …/bin.pm6 :667:	my ($owner, $repo) = $module-url.split('/')[3,4];
gfldex/perl6-meta6-bin …/bin.pm6 :677:	my ($owner, $repo) = $module-url.split('/')[3,4];
gfldex/perl6-meta6-bin …/bin.pm6 :688:	my ($owner, $repo, $meta6) = ($module-name ?? try query-module($module-name, :$verbose) !! local-module(:$base-dir, :$meta6-file-name, :$verbose))<owner repo meta6>;
grondilu/clifford …/BasisBlade.pm6 :149:	my ($ga, $gb, $gr) = map { grade(.bit-encoding) }, $a, $b, $r;
grondilu/clifford …/BasisBlade.pm6 :158:	my ($ga, $gb, $gr) = map { grade(.bit-encoding) }, $a, $b, $r;
grondilu/clifford …/BasisBlade.pm6 :175:	my ($ga, $gb, $gr) = map { grade(.bit-encoding) }, $a, $b, $r;
grondilu/clifford …/Optimized.pm6 :58:	my ($A, $B) = map {
grondilu/clifford …/axioms.t :14:	my ($a, $b, $c) = random() xx 3;
grondilu/clifford …/derived-products.t :18:	my ($A, $B, $C) = random() xx 3;
grondilu/libdigest-perl6 …/Digest.pm :35:	my ($A, $B, $C, $D) = @H;
grondilu/libdigest-perl6 …/SHA.pm :43:	my ($A,$B,$C,$D,$E) = @H;
grondilu/p6-modular …/Modular.pm :9:	my ($c, $d, $uc, $vc, $ud, $vd) = ($.residue, $.modulus, 1, 0, 0, 1);
hankache/perl6-IUP …/IUP.pm6 :277:	my ($name, $value) = $pair.kv;
hankache/perl6-Imlib2 …/create_transparent_image.p6 :51:	my ($red, $green, $blue, $alpha) = (0, 0, 0, 0);
hankache/perl6-Imlib2 …/font.p6 :64:	my ($tw, $th) = $im.get_text_size($text);
hankache/perl6-Imlib2 …/image_modification.p6 :101:	my ($w, $h) = $im.image_get_size();
hankache/perl6-Imlib2 …/Imlib2.pm6 :913:	my ($red, $green, $blue, $alpha) = (0, 0, 0, 255);
hankache/perl6-Imlib2 …/Imlib2.pod :846:	my ($width, $height) = $im.image_get_size();
hankache/perl6-Imlib2 …/Imlib2.pod :1509:	my ($width, $height) = $im.get_text_size($text);
hankache/perl6-Imlib2 …/Imlib2.pod :1536:	my ($horizontal_advance, $vertical_advance) = $im.get_text_advance($text);
hankache/perl6-Imlib2 …/Imlib2.pod :1877:	my (@red_table, @green_table, @blue_table, @alpha_table);
hankache/perl6-Imlib2 …/Imlib2.pod :1989:	my ($x, $y) = (10, 10);
hankache/perl6-Imlib2 …/Imlib2.pod :2199:	my ($px1, $py1, $px2, $py2) = $polygon.get_bounds();
hankache/perl6-Imlib2 …/02-context_setting_getting.t :82:	my ($red, $green, $blue, $alpha);
hankache/perl6-Imlib2 …/02-context_setting_getting.t :109:	my ($hue, $saturation, $value);
hankache/perl6-Imlib2 …/02-context_setting_getting.t :157:	my ($cyan, $magenta, $yellow);
hankache/perl6-Imlib2 …/02-context_setting_getting.t :184:	my ($x, $y, $width, $height);
hankache/perl6-Imlib2 …/04-query_modify_parameters.t :29:	my ($width, $height) = $im.image_get_size();
hipek8/p6-Statistics-LinearRegression …/README.md :25:	my ($slope, $intercept) = get-parameters(@arguments, @values);
hipek8/p6-Statistics-LinearRegression …/LinearRegression.pm6 :33:	my ($slope, $intercept) = get-parameters(@x,@y);
hipek8/p6-Statistics-LinearRegression …/LinearRegression.pm6 :72:	my ($slope, $intercept) = get-parameters(@arguments, @values);
hipek8/p6-Statistics-LinearRegression …/01-basic.t :7:	my ($slope, $intercept) = get-parameters(@x,@y);
hoelzro/p6-algorithm-elo …/README.md :14:	my ( $player-a-score, $player-b-score ) = 1_600, 1_600;
hoelzro/p6-algorithm-elo …/Elo.pm :44:	my ( $player-a-score, $player-b-score ) = 1_600, 1_600;
hoelzro/p6-linenoise …/README.md :63:	my ( $prefix, $last-word ) = find-last-word($line);
hoelzro/p6-linenoise …/fill-constants.pl :7:	my ( $key, $value ) = $definition.split('=');
hoelzro/p6-linenoise …/Linenoise.pm6.in :144:	my ( $prefix, $last-word ) = find-last-word($line);
jaffa4/Dependency-Sort …/Sort.pm6 :24:	# my ( $a, $b ) = ( shift, shift );
jaffa4/inistorage …/Storage.pm :93:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :109:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :111:	my ( $group2, $entry2 ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :138:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :198:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :222:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :224:	my ( $groupnew, $entrynew ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :251:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :253:	my ($arrayname,$no)= $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :277:	my ( $group, $array ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :322:	my ( $group, $entry ) = $/[0].Str, $/[1].Str;
jaffa4/inistorage …/Storage.pm :369:	my ( $group, $entry ) = $0,$1;
jaffa4/pathutil …/Util.pm :177:	my ($dir)= ( $filename ~~ $filedirreg )[0];
jamesalbert/JSON-WebToken …/WebToken.pm6 :43:	my ($claims, $secret, $algorithm, $extra_headers) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :86:	my ($jwt, $secret, $verify_signature=Nil, $accepted_algorithms=Nil) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :128:	my ($header_segment, $claims_segment, $crypto_segment) = @$segments;
jamesalbert/JSON-WebToken …/WebToken.pm6 :131:	my ($header, $claims, $signature);
jamesalbert/JSON-WebToken …/WebToken.pm6 :181:	my (%class_loaded, %alg_to_class);
jamesalbert/JSON-WebToken …/WebToken.pm6 :183:	my ($algorithm) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :197:	my ($algorithm, $message, $secret) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :204:	my ($algorithm, $message, $secret, $signature) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :210:	my ($algorithm) = @_;
jamesalbert/JSON-WebToken …/WebToken.pm6 :237:	my ($klass) = @_;
jamesalbert/JSON-WebToken …/Crypt.pm6 :4:	my ($class, $algorithm, $message, $key) = @_;
jamesalbert/JSON-WebToken …/Crypt.pm6 :9:	my ($class, $algorithm, $message, $key, $signature) = @_;
jamesalbert/JSON-WebToken …/RSA.pm6 :14:	my ($algorithm, $message, $key) = @_;
jamesalbert/JSON-WebToken …/RSA.pm6 :25:	my ($algorithm, $message, $key, $signature) = @_;
jamesalbert/JSON-WebToken …/Exception.pm6 :5:	my (%err) = @_;
jamesalbert/JSON-WebToken …/04_secret_cb.t :13:	my (%opts) = @_;
jamesalbert/JSON-WebToken …/04_secret_cb.t :14:	my ($claims, $desc) = %opts{qw/claims desc/};
jamesalbert/JSON-WebToken …/04_secret_cb.t :17:	my ($header, $claims) = @_;
jamesalbert/JSON-WebToken …/Util.pm6 :11:	my ($desc, $input, $expects_exception) =
jamesalbert/JSON-WebToken …/Util.pm6 :14:	my ($claims, $secret, $public_key, $algorithm, $header_fields) =
jdv/p6-data-selector …/Selector.pm :384:	my ( $selector_tree, $data_tree, ) = @( shift @queue );
jdv/p6-data-selector …/Selector.pm :464:	my ( %arrays_to_be_trimmed, %deferred_excludes, %matched_includes, );
jdv/p6-data-selector …/02-parse_string.t :308:	my ( $selector_string, $selector_tree_expected, $elasped_expected, ) =
jdv/p6-data-selector …/03-apply_tree.t :177:	my ( $selector, $data_tree_expected, $elasped_expected, ) = @($_);
jnthn/p6-app-installermaker-wix …/InstallerBuilder.pm6 :137:	my (@do-now, @new-remaining);
jnthn/p6-app-installermaker-wix …/PreCheck.pm6 :21:	my ($name, $try) = .split(': ');
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :484:	my ($stringheap_size, $types_size, $staticframe_size, $snapshot_entry_count) = @sizes;
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :508:	my ($stringheap_fd, $types_fd, $staticframe_fd, $snapshots_fd) = @fds;
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :532:	my ($typecount, $size-per-type) = readSizedInt64($fh.gimme(8)) xx 2;
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :544:	my ($staticframecount, $size-per-frame) = readSizedInt64($fh.gimme(4)) xx 2;
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :650:	my ($count, $size-per-collectable) = readSizedInt64($fh.gimme(8)) xx 2;
jnthn/p6-app-moarvm-heapanalyzer …/Model.pm6 :775:	my ($count, $size-per-reference) = readSizedInt64($fh.gimme(8)) xx 2;
jnthn/p6-app-moarvm-heapanalyzer …/Shell.pm6 :99:	my ($what, $cond, $value) = ~$1, ~$2, ~$3;
jnthn/p6-app-moarvm-heapanalyzer …/Shell.pm6 :109:	my ($what, $cond, $value) = ~$0, ~$1, ~$2;
jnthn/p6-http-hpack …/HPACK.pm6 :334:	my ($key, $value) = decode-str($packed, $idx) xx 2;
jnthn/p6-test-scheduler …/Scheduler.pm6 :181:	my (@now, @future) := $!lock.protect: {
jnthn/p6-test-scheduler …/Scheduler.pm6 :182:	my (:@now, :@future) := @!future.classify: {
jnthn/rakudo-debugger …/CommandLine.pm :160:	my ($from_line, $from_pos) = self.line_of($from, 0, 0);
jnthn/rakudo-debugger …/CommandLine.pm :161:	my ($to_line, $to_pos) = self.line_of($to, $from_line, $from_pos);
jnthn/rakudo-debugger …/CommandLine.pm :306:	my ($from_line, $) = %sources{$filename}.line_of($from, -1, -1);
jnthn/rakudo-debugger …/CommandLine.pm :307:	my ($to_line, $) = %sources{$filename}.line_of($to, -1, -1);
jnthn/rakudo-debugger …/CommandLine.pm :323:	my ($from_line, $) = %sources{$filename}.line_of($from, -1, -1);
jnthn/rakudo-debugger …/CommandLine.pm :324:	my ($to_line, $) = %sources{$filename}.line_of($to, -1, -1);
jnthn/rakudo-debugger …/CommandLine.pm :696:	my ($file, $line);
jnthn/rakudo-debugger …/CommandLine.pm :729:	my ($file, $line);
jonathanstowe/Audio-Hydrogen …/euclid :140:	my ($instrument, $slots, $fills) = $part.split(',',:skip-empty).map({$_.Int});
jonathanstowe/Audio-Liquidsoap …/Liquidsoap.pm :752:	my ( $name, $type ) = $var.split(/\s+\:\s+/);
jonathanstowe/Audio-Liquidsoap …/Liquidsoap.pm :918:	my ( $key, $value ) = $line.split('=',2);
jonathanstowe/Audio-Liquidsoap …/Liquidsoap.pm :930:	if my ( $key, $value) = get-metadata-pair($line) {
jonathanstowe/Audio-Liquidsoap …/Liquidsoap.pm :1192:	my ($name, $type) = $item-line.split(/\s+\:\s+/);
jonathanstowe/Audio-Liquidsoap …/050-list.t :113:	my ( $con-rid, $ign-rid ) = @secondary-queue.pick(2);
jonathanstowe/Audio-Liquidsoap …/test-resources.liq :25:	output.dummy(id="dummy-output", radio)
jonathanstowe/Audio-Sndfile …/Sndfile.pm :382:	my ($buff, $rc ) = self.read-read($frames, $info, &read-sub, $type, :raw).list;
jonathanstowe/Audio-Sndfile …/015-sanity.t :58:	my ($shorts-raw-in,$shorts-raw-frames);
jonathanstowe/XML-Class …/110-custom.t :22:	my ( $re, $im) = $v.split(',');
jpve/perl6-net-packet …/Ethernet.pm6 :134:	# my ($s-tpid, $s-tci, $c-tpid, $c-tci, $type) = $.frame.subbuf(6+6,4+4+2).unpack('nnnnn');
jpve/perl6-net-pcap …/filter.t :11:	my ($hdr, $frame) = $pcap.next_ex();
jpve/perl6-net-pcap …/open_offline.t :10:	my ($hdr, $frame) = $pcap.next_ex();
kalkin/Ddt …/Ddt.pm6 :52:	my ($o, $out) = tempfile;
kalkin/Ddt …/Ddt.pm6 :53:	my ($e, $err) = tempfile;
kalkin/Ddt …/Distribution.pm6 :131:	my ($user, $repo) = guess-user-and-repo();
kalkin/Ddt …/Distribution.pm6 :230:	my ($, $url) = $line.split(/\s+/);
kalkin/Ddt …/Hack.pm6 :52:	my (:@remote, :@local) := @candidates.classify: {.dist !~~ Zef::Distribution::Local ?? <remote> !! <local>}
kalkin/Ddt …/Release.pm6 :9:	my ($user, $repo) = guess-user-and-repo($ddt.META6<source-url>);
kmwallio/Acme-Skynet …/Skynet.pm6 :148:	my ($phrase, @action) = $str.split(/\s*('->'|',')\s*/);
kmwallio/Acme-Skynet …/ChainLabel.pm6 :75:	my ($phrase, @action) = $command.split(/\s*('->'|',')\s*/);
labster/p6-File-Spec-Case …/Case.pm :56:	my ($volume, $dirname, $basename) = $path.parts<volume dirname basename>;
labster/p6-Lingua-Number …/Number.pm6 :102:	my ($ipart, $fpart) = $number.split('.');
labster/p6-Lingua-Number …/Number.pm6 :125:	my ($next-number, $before, $after) = ('' xx 3);
labster/p6-Lingua-Number …/Number.pm6 :190:	my ($i, $maxi) = $number.chars xx 2;
labster/perl6-File-Find-Duplicates …/Duplicates.pm6 :9:	my (@files, @duplicates);
lancew/ScientistP6 …/Scientist.pm :24:	my ($candidate, $control);
leejo/geo-ip2location-lite-p6 …/README.md :46:	my ( $country_short,$country_long,$region,$city,... )
leejo/geo-ip2location-lite-p6 …/Lite.pod :44:	my ( $country_short,$country_long,$region,$city,... )
leont/yamlish …/YAMLish.pm6 :154:	my ($line-num, $column) := self.line-column($/);
leont/yamlish …/YAMLish.pm6 :556:	my ($class, $elems) = @($<element>.ast);
leont/yamlish …/YAMLish.pm6 :732:	my ($class, $elems) = @($<value>.ast);
leont/yamlish …/YAMLish.pm6 :739:	my ($class, $elems) = @($<value>.ast);
lestrrat/p6-Crust-Middleware-Session …/Session.pm6 :95:	my ($id, $session) = self.get-session(%env);
madcapjake/rabble …/Combinators.pm6 :12:	my (&op, $stash) = $ctx.stack.pop xx 2;
madcapjake/rabble …/Shufflers.pm6 :28:	my ($z, $y, $x) = $ctx.stack.pop xx 3;
madcapjake/rabble …/Shufflers.pm6 :33:	my ($top, $und) = $ctx.stack.pop xx 2;
madcapjake/rabble …/Shufflers.pm6 :39:	my ($b, $a) = $ctx.stack.pop xx 2;
masak/007 …/OpScope.pm6 :81:	my ($t1, $t2) = %precedence.keys.sort;
masak/007 …/Actions.pm6 :101:	multi enforce-leftmost-my(Q::Term::My $) {} # everything's fine
masak/007 …/Actions.pm6 :102:	multi enforce-leftmost-my(Q::Term $) { panicExportNothing() }
masak/007 …/Actions.pm6 :103:	multi enforce-leftmost-my(Q::Prefix $) { panicExportNothing() }
masak/007 …/Actions.pm6 :104:	multi enforce-leftmost-my(Q::Postfix $postfix) { enforce-leftmost-my($postfix.term) }
masak/007 …/Actions.pm6 :105:	multi enforce-leftmost-my(Q::Infix $infix) { enforce-leftmost-my($infix.lhs) }
masak/007 …/Actions.pm6 :107:	enforce-leftmost-my($<EXPR>.ast);
masak/007 …/Actions.pm6 :691:	method term:my ($/) {
masak/007 …/Test.pm6 :291:	my ($line, $column) = linecol($<trailing>.from);
masak/007 …/plug-test-suite-into-007-runtime :70:	my ($better, $worse) = False, False;
masak/007 …/code-snippets.t :9:	my ($topic, @snippet-lines);
masak/crypt …/hanoi.t :111:	my ($event, @rest) = $game.move($source, $target);
masak/crypt …/hanoi.t :120:	my ($source, $, $target) = @last_move;
masak/druid …/generate-board :73:	my ($x1,$y1,$z1) = @one-corner;
masak/druid …/generate-board :74:	my ($x2,$y2,$z2) = @other-corner;
masak/druid …/generate-board :146:	my ($c1, $ro1, $co1, $h1, $c2, $ro2, $co2, $h2) = $p1.list, $p2.list;
masak/druid …/generate-board :147:	my ($x1, $y1, $z1, $x2, $y2, $z2)
masak/druid …/Game.pm :245:	my ($row, $col) = self.extract-coords(
masak/druid …/Game.pm :282:	my ($r, $c) = .<row>, .<col> given $pos;
masak/druid …/Computer.pm :18:	my ($last-row, $last-column) = @($!last-move);
masak/druid …/Computer.pm :31:	my ($last-row, $last-column) = @($!last-move);
masak/druid …/Computer.pm :48:	my ($row, $column);
masak/gge …/Exp.pm :273:	my ($min, $max, $bt) = map { self.hash-access($_) },
masak/gge …/Exp.pm :670:	my ($captgen, $captsave, $captback) = self.gencapture($label);
masak/gge …/Exp.pm :774:	my ($captgen, $captsave, $captback) = self.gencapture($label);
masak/gge …/OPTable.pm :100:	my (@termstack, @tokenstack, @operstack);
masak/gge …/Perl6Regex.pm :274:	my ($subname, $pos) = parse_subname($target, $mob.to);
masak/gge …/Perl6Regex.pm :362:	my ($subname, $newpos) = parse_subname($target, $pos);
masak/gge …/Perl6Regex.pm :444:	my ($mod2, $mod1);
masak/gge …/03-optable.t :34:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :117:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :127:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :137:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :148:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :158:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/03-optable.t :167:	-> @args { my ($name, %opts) = @args; $optable.newtok($name, |%opts) }
masak/gge …/01-regex.t :35:	my ($pattern, $target, $result, $description) = $0, $1, $2, $3;
masak/gge …/test-regex :8:	my ($pattern, $target) = @*ARGS;
masak/html-template …/01.t :135:	my ($input, $parameters, $expected_output, $description)
masak/html-template …/01.t :147:	my ($input, $parameters, $expected_exception, $description)
masak/html-template …/01.t :186:	my ($file, $parameters, $expected_exception, $description)
masak/xml-writer …/Writer.pm :67:	my ($name, $subtree) = $node.kv;
masak/yapsi …/Yapsi.pm :706:	my (@vars, @slots);
masak/yapsi …/Yapsi.pm :744:	my ($levels, $slot, $register) = +$0, +$1, +$2;
masak/yapsi …/Yapsi.pm :753:	my ($register, $levels, $slot) = +$0, +$1, +$2;
masak/yapsi …/Yapsi.pm :759:	my ($var1-levels, $var1-slot) = +$0, +$1;
masak/yapsi …/Yapsi.pm :762:	my ($var2-levels, $var2-slot) = +$2, +$3;
masak/yapsi …/Yapsi.pm :770:	my ($levels, $slot, $register) = +$0, +$1, +$2;
masak/yapsi …/compiler.t :85:	my ($program, $expected-error) = .key, .value given $pair;
mempko/PKafka …/Config.pm6 :79:	my ($r, $errstr) = PKafka::rd_kafka_conf_set($!conf, $name, $value);
mempko/PKafka …/Config.pm6 :107:	my ($r, $errstr) = PKafka::rd_kafka_topic_conf_set($!conf, $name, $value);
mempko/PKafka …/Kafka.pm6 :56:	my ($pointer, $errstr) = PKafka::rd_kafka_new($type, $conf.handle);
moritz/svg-plot …/parse-spectest-progress.pl :14:	my (@date, @pass, @fail, @todo, @skip, @specskip);
moritz/svg-plot …/Plot.pm :106:	my ($y, $h) = (($v - $min_y) * $step_y, $v * $step_y);
moritz/svg-plot …/Plot.pm :350:	my ($prev-x, $prev-y);
moritz/svg-plot …/Pie.pm :47:	my ($text-anchor, $base-alignment);
moznion/p6-Router-Boost …/Boost.pm6 :72:	my ($name, $pattern) = $captured.split(':', 2);
moznion/p6-Router-Boost …/Boost.pm6 :105:	my ($captured, $stuff) = @!leaves[$LEAF-IDX];
moznion/p6-Router-Boost …/Method.pm6 :28:	my ($method, $stuff) = @route;
moznion/p6-Stream-Buffered …/File.pm6 :14:	my ($filename, $fh) = tempfile;
nige123/app.123.do …/Timeline.pm :148:	my ($first-entry, @extra-now-entries) = |%!entries{Date.today.daycount}.grep(*.is-now);
nige123/app.123.do …/Viewport.pm :17:	my ($space, $heading, @entry-lines) = self.render-day($daycount).lines;
nige123/jmp.nigelhamilton.com …/Finder.pm :22:	my ($file-path, $line-number, $context) = $line.split(':', 3);
nkh/P6-Data-Dump-Tree …/JSON_folding.pl :84:	my ($k, $b) = $element ;
nkh/P6-Data-Dump-Tree …/JSON_parsed.pl :91:	my ($k, $b) = $element ;
nkh/P6-Data-Dump-Tree …/diff.pl :14:	my (%df1, %df2) := get_data_structures() ;
nkh/P6-Data-Dump-Tree …/diff_string.pl :14:	my (@df1, @df2) := get_data_structures() ;
nkh/P6-Data-Dump-Tree …/flat.pl :99:	my ($lines, $title, $ds, $flat) = |$_ ;
nkh/P6-Data-Dump-Tree …/two_columns.pl :19:	my (:@a, :@p) := $_.classify: { $_ !~~ Pair ?? 'a' !! 'p' };
nkh/P6-Data-Dump-Tree …/Tree.pm :228:	my ($, $, $final, $) = $s.WHAT =:= Mu ?? ('', '.Mu', DDT_FINAL ) !! self.get_element_header($s) ;
nkh/P6-Data-Dump-Tree …/Tree.pm :244:	my ($final, $rendered, $s, $continuation_glyph, $wh_token) =
nkh/P6-Data-Dump-Tree …/Tree.pm :258:	my (@sub_elements, %glyphs) := $.get_sub_elements($s, $current_depth, @head_glyphs, $element) ;
nkh/P6-Data-Dump-Tree …/Tree.pm :277:	my ($k, $b, $s, $path) = $element ;
nkh/P6-Data-Dump-Tree …/Tree.pm :278:	my ($glyph_width, $glyph, $continuation_glyph, $multi_line_glyph, $empty_glyph, $filter_glyph) = @glyphs ;
nkh/P6-Data-Dump-Tree …/Tree.pm :282:	my ($v, $f, $final, $want_address) =
nkh/P6-Data-Dump-Tree …/Tree.pm :331:	my ($address, $rendered) =
nkh/P6-Data-Dump-Tree …/Tree.pm :353:	my ($ddt_address, $perl_address, $link) =
nkh/P6-Data-Dump-Tree …/Tree.pm :356:	my (@kvf, @ks, @vs, @fs) := self!split_entry(
nkh/P6-Data-Dump-Tree …/Tree.pm :389:	my ($wh, $wh_token) = ($.wrap_header, ) ;
nkh/P6-Data-Dump-Tree …/Tree.pm :512:	my (@kvf, @ks, @vs, @fs) ;
nkh/P6-Data-Dump-Tree …/Tree.pm :515:	my ($k2, $v2, $f2) = ($k // '', $v // '', $f // '').map: { .subst(/\t/, ' ' x 8, :g) } ;
nkh/P6-Data-Dump-Tree …/Tree.pm :701:	my ($link, $rendered) = ('', False) ;
nkh/P6-Data-Dump-Tree …/DHTML.pm :89:	my ($r, $wrap_data) = $.get_dump_lines(
nkh/P6-Data-Dump-Tree …/DHTML.pm :127:	my ($pad, $pad2) = ( ' ' xx $depth + 1, ' ' xx $depth + 2) ;
nkh/P6-Data-Dump-Tree …/DHTML.pm :128:	my ($class, $uuid) = (wd<class>, wd<class> ~ '_' ~ wd<uuid>) ;
nkh/P6-Data-Dump-Tree …/DHTML.pm :129:	my ($a_uuid, $c_uuid) = ("a_$uuid", "c_$uuid") ;
nkh/P6-Data-Dump-Tree …/Diff.pm :70:	my ($remove_eqv, $remove_eq) = %options<remove_eqv remove_eq> ;
nkh/P6-Data-Dump-Tree …/Diff.pm :114:	my ($final1, $rendered1, $s1, $cont_glyph1) =
nkh/P6-Data-Dump-Tree …/Diff.pm :117:	my ($final2, $rendered2, $s2, $cont_glyph2) =
nkh/P6-Data-Dump-Tree …/Diff.pm :135:	my ($pad_glyph1, $pad_glyph2) = (|$head_glyph1, @glyphs1[2]), (|$head_glyph2, @glyphs2[2]) ;
nkh/P6-Data-Dump-Tree …/Diff.pm :191:	my (@sub_elements1, %glyphs1) := $d1.get_sub_elements($s1, $cd1, (|$head_glyph1, $cont_glyph1), $s1_header) ;
nkh/P6-Data-Dump-Tree …/Diff.pm :192:	my (@sub_elements2, %glyphs2) := $d2.get_sub_elements($s2, $cd2, (|$head_glyph2, $cont_glyph2), $s2_header) ;
nkh/P6-Data-Dump-Tree …/Foldable.pm :161:	my ($lines, $wrap_data) = $dumper.get_dump_lines:
nkh/P6-Data-Dump-Tree …/Foldable.pm :166:	my (@lines, @line_lengths) ;
nkh/P6-Data-Dump-Tree …/Foldable.pm :330:	my ($fold_line, @lines) = ($!top_line, ) ;
nkh/P6-Data-Dump-Tree …/Foldable.pm :365:	my (@matches, $match) ;
nkh/P6-Data-Dump-Tree …/LayHorizontal.pm :268:	my (Bool $matched, Int $rows, Int $width) ;
nkh/P6-Data-Dump-Tree …/LayHorizontal.pm :277:	my ($st, $ss, $sr) = $target($s) ;
nkh/P6-Data-Dump-Tree …/LayHorizontal.pm :310:	my ($matched, $rows, $width) = match_target(@targets, $s, $d.flat_depth + $depth) ;
nkh/P6-Data-Dump-Tree …/TerminalFoldable.pm :61:	my ($ph, $page_width) = ((qx[stty size] || '0 80') ~~ /(\d+) \s+ (\d+)/).List ;
nkh/P6-Data-Dump-Tree …/TerminalFoldable.pm :129:	my ($text, $length) = ($line[2], $line[3]) ;
nkh/P6-Data-Dump-Tree …/04_flat.t :49:	my ($lines, $title, $ds, $flat) = | $_ ;
nkh/P6-Data-Dump-Tree …/81_color.t :53:	my ($lines, $title, $ds, $flat) = | $_ ;
noqisofon/p6-miroku …/Miroku.pm6 :105:	my ( $module, $module-file ) = guess-main-module;
noqisofon/p6-miroku …/Miroku.pm6 :272:	my ($user, $repository) = guess-user-and-repository;
noqisofon/p6-miroku …/Miroku.pm6 :303:	my ($, $url) = $line.split( /\s+/ );
noqisofon/p6-miroku …/03-find-source-url.t :12:	my ($, $url) = $line.split( /\s+/ );
noqisofon/p6-miroku …/FakeCommand.pm6 :18:	my ($output, $errput);
nunorc/p6-Pekyll …/Pekyll.pm6 :85:	my ($left, $right) = $expr.split('*');
ohmycloud/fanfou-p6 …/FanFou.pm6 :65:	my ($path,$) = $url.split(':');
p6-css/CSS-Grammar-p6 …/AST.pm :102:	my ($raw-type, $_class) = $type.split(':');
p6-css/CSS-Grammar-p6 …/AST.pm :122:	my ($key, $value) = $cap.kv;
p6-css/CSS-Grammar-p6 …/AST.pm :125:	my ($type, $_class) = $key.split(':');
p6-css/CSS-Grammar-p6 …/AST.pm :163:	my ($key, $value) = $cap.kv;
p6-css/CSS-Grammar-p6 …/AST.pm :167:	my ($type, $_class) = $key.split(':');
p6-css/CSS-Grammar-p6 …/compat.t :24:	my ($rule, $test) = @( from-json($_) );
p6-css/CSS-Grammar-p6 …/compat.t :31:	my ($level, $opts) = .kv;
p6-css/CSS-Grammar-p6 …/css3-syntax.t :16:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Grammar-p6 …/error-handling.t :21:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Grammar-p6 …/parse-stylesheets.t :77:	my ($test, $input) = .kv;
p6-css/CSS-Grammar-p6 …/parse-stylesheets.t :82:	my ($level, $class) = .kv;
p6-css/CSS-Grammar-p6 …/parse-warnings.t :21:	my ($test, $class) = .kv;
p6-css/CSS-Module-CSS3-Selectors-p6 …/00basic.t :16:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Module-p6 …/make-modules.pl :25:	my ($input-spec, $class-isa) = .kv;
p6-css/CSS-Module-p6 …/make-modules.pl :35:	my ($type, $subclass) = .kv;
p6-css/CSS-Module-p6 …/css3-_base.t :47:	my ($in, $ast) = .kv;
p6-css/CSS-Module-p6 …/css3-_base.t :48:	my ($rule, $input) = $in.kv;
p6-css/CSS-Module-p6 …/css3x-fonts.t :20:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Module-p6 …/css3x-media-queries.t :19:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Module-p6 …/css3x-paged-media.t :18:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Module-p6 …/error-handling.t :21:	my ($rule, $expected) = @( from-json($_) );
p6-css/CSS-Properties-p6 …/Properties.pm :414:	my (\h, \s, \l) = $v.hsl;
p6-css/CSS-Properties-p6 …/Properties.pm :418:	my (\h, \s, \l) = $v.hsl;
p6-css/CSS-Properties-p6 …/Properties.pm :422:	my (\r, \g, \b, \a) = $v.rgba;
p6-css/CSS-Properties-p6 …/Properties.pm :427:	my (\r, \g, \b) = $v.rgb;
p6-css/CSS-Properties-p6 …/PageBox.pm :62:	my ($page-width, $page-height) = do if @length {
p6-css/CSS-Specification-p6 …/Actions.pm :78:	my ($key, $value) = .kv;
p6-css/CSS-Specification-p6 …/Actions.pm :135:	my (Str $name, Hash $val) = .kv;
p6-css/CSS-Specification-p6 …/build.t :85:	my ($input, $expected) = .kv;
p6-css/CSS-Specification-p6 …/terms.t :54:	my ($in, $ast) = .kv;
p6-css/CSS-Specification-p6 …/terms.t :55:	my ($rule, $input) = $in.kv;
p6-css/CSS-Writer-p6 …/Writer.pm :348:	my ($lo, $hi) = .map: {sprintf("%X", $_)};
p6-css/CSS-Writer-p6 …/write-css.t :21:	my ($rule, $css, $opts) = @( from-json($_) );
p6-pdf/PDF-API6 …/README.md :508:	Synopsis, my ($x-o, $y-o, ...) = $gfx.base-coords(
p6-pdf/PDF-Content-p6 …/make-core-fonts.pl :43:	my ($scheme, $byte) = .kv;
p6-pdf/PDF-Content-p6 …/Content.pm :272:	my ($x, $y) = $.text-position;
p6-pdf/PDF-Content-p6 …/Content.pm :277:	my ($x-shift, $y-shift) = $text-block.render(self, :$nl, :$top, :$left, :$preserve);
p6-pdf/PDF-Content-p6 …/Matrix.pm :97:	my ($x, $y);
p6-pdf/PDF-Content-p6 …/core-font.t :67:	my ($enc, $encoded) = .kv;
p6-pdf/PDF-Content-p6 …/images.t :199:	my ($desc, $img) = .kv;
p6-pdf/PDF-Content-p6 …/ops.t :254:	my ($x, $y) = $g.base-coords(80, 100);
p6-pdf/PDF-Grammar-p6 …/content-parse.t :161:	my ($test, $spec) = $_.kv;
p6-pdf/PDF-Grammar-p6 …/content-parse.t :162:	my ($str, $expected-ast) = @$spec;
p6-pdf/PDF-p6 …/edit-pdf-metadata.pl :14:	my ($temp) = tempfile;
p6-pdf/PDF-p6 …/Tie.pm :216:	my (Int $obj-num, Int $gen-num, $reader) = $ind-ref.value.list;
p6-pdf/PDF-p6 …/Reader.pm :287:	my (ObjNumInt $obj-num, GenNumInt $gen-num, $obj-raw) = @ind-obj;
p6-pdf/PDF-p6 …/Reader.pm :714:	my (ObjNumInt $obj-num, GenNumInt $gen-num, $object, UInt $offset) = @ind-obj;
p6-pdf/PDF-p6 …/Writer.pm :125:	my ($op, $args) = .kv;
p6-pdf/PDF-p6 …/Writer.pm :227:	my (UInt \obj-num, UInt \gen-num, \object where Pair | Hash) = @_;
p6-pdf/PDF-p6 …/filter.t :22:	my ($name, $input) = .kv;
p6-pdf/PDF-p6 …/io-serialize.t :68:	my ($obj-num-a, $gen-num-a) = @( $^a.value );
p6-pdf/PDF-p6 …/io-serialize.t :69:	my ($obj-num-b, $gen-num-b) = @( $^b.value );
p6-pdf/PDF-p6 …/io.t :14:	my ($test, $input) = .kv;
p6-pdf/PDF-p6 …/write-pdf.t :31:	my ($rule) = %ast.keys;
perl6-community-modules/Date-WorkdayCalendar …/WorkdayCalendar.pm :33:	my ($type, $data) = split /':'/, $line;
perl6-community-modules/Date-WorkdayCalendar …/WorkdayCalendar.pm :36:	my ($year, $month, $day) = split /'/'|'-'/, $data; #--- Only Holidays '
perl6-community-modules/Date-WorkdayCalendar …/04-Workdate_calculations.t :42:	my (Int $NW1, Int $NW2, Int $wt1, Int $wt2, Int $nw1, Int $nw2) = @fields.map({ .Int });
perl6-community-modules/perl6-Toaster …/toaster-viewer :19:	my ($before, $after) = .{ $stash<commits><> }[0, *-1];
perl6-community-modules/perl6-Toaster …/toaster-p5-viewer :17:	my ($y, $m, $c, $s ) = $a =~ /\w+/g;
perl6-community-modules/perl6-Toaster …/toaster-p5-viewer :18:	my ($y2, $m2, $c2, $s2) = $b =~ /\w+/g;
perl6-community-modules/perl6-Toaster …/toaster-p5-viewer :31:	my ($before, $after) = (@$_{ @{$stash->{commits}} })[0, -1];
perl6/DBIish …/Connection.pm6 :250:	my ($aid, $attnum, $typmod, $typtype, $typoid) =
perl6/DBIish …/10-mysql.t :160:	my ($row, $errstr);
perl6/DBIish …/10-mysql.t :320:	#my ($row, $errstr, $array_ref);
perl6/DBIish …/10-mysql.t :329:	my ( %testInsertVals, $all_ok );
perl6/DBIish …/10-mysql.t :340:	my ($array_ref);
perl6/DBIish …/10-mysql.t :583:	# my ($blob) = @_;
perl6/DBIish …/10-mysql.t :607:	#my ($blob, $qblob) = "";
perl6/DBIish …/10-mysql.t :617:	#my ($query);
perl6/DBIish …/10-mysql.t :644:	#my ($version)= $dbh->selectrow_array("SELECT version()")
perl6/DBIish …/10-mysql.t :656:	my ($dummy,$have_innodb)=
perl6/DBIish …/10-mysql.t :672:	my ($info)= $sth->fetchall_arrayref({});
perl6/DBIish …/10-mysql.t :877:	my ($info)= $sth->fetchall_arrayref({});
perl6/DBIish …/10-mysql.t :1078:	my ($dbh, $sth);
perl6/DBIish …/10-mysql.t :1131:	my ($dbh, $sth, $aref);
perl6/DBIish …/10-mysql.t :1412:	my ($dbh, $sth);
perl6/DBIish …/10-mysql.t :1421:	my ($rows, $errstr, $ret_ref);
perl6/DBIish …/10-mysql.t :1467:	my ($dbh, $row);
perl6/DBIish …/10-mysql.t :1480:	my ($blob) = @_;
perl6/DBIish …/10-mysql.t :1653:	my ($id, $name) = @$ref;
perl6/DBIish …/10-mysql.t :1706:	my($dbh, $table, $num) = @_;
perl6/DBIish …/10-mysql.t :1707:	my($sth, $got);
perl6/DBIish …/10-mysql.t :2062:	my ($dbh, $sth);
perl6/DBIish …/10-mysql.t :2072:	my($p, $pt);
perl6/DBIish …/10-mysql.t :2094:	my ($size, $prev_size, $ok, $not_ok, $dbh2, $msg);
perl6/DBIish …/10-mysql.t :2421:	my ($dbh)= @_;
perl6/DBIish …/10-mysql.t :2502:	my ($row, $vers, $test_procs);
perl6/DBIish …/10-mysql.t :2631:	my ($row, $vers, $test_procs, $dbh, $sth);
perl6/DBIish …/10-mysql.t :2872:	my (@stateStack, $count, $off, $skip_all_reason, $skip_n_reason, @skip_n);
perl6/DBIish …/10-mysql.t :2878:	my ($command) = shift;
perl6/DBIish …/10-mysql.t :2886:	my($d);
perl6/DBIish …/10-mysql.t :2935:	my($result, $error, $diag) = @_;
perl6/DBIish …/10-mysql.t :2953:	my ($pack, $file, $line) = caller();
perl6/DBIish …/10-mysql.t :2992:	my ($rc, $err) = @_;
perl6/DBIish …/10-mysql.t :3005:	my(@tables, $testtable, $listed);
perl6/DBIish …/10-mysql.t :3011:	my($dbh) = @_;
perl6/DBIish …/10-mysql.t :3081:	my($dbh) = shift;
perl6/DBIish …/10-mysql.t :3082:	my(@tables);
perl6/DBIish …/10-mysql.t :3097:	my($hostname, $dsn) = @_;
perl6/DBIish …/10-mysql.t :3105:	my ($dbh) = @_;
perl6/DBIish …/27-mysql-datetime.t :50:	my ($date, $datetime) = $sth.row;
perl6/DBIish …/34-pg-types.t :49:	my ($col1) = $sth.row;
perl6/DBIish …/36-pg-enum.t :69:	my (@enumtypes, @options);
perl6/DBIish …/37-pg-datetime.t :55:	my ($date, $datetime) = $sth.row;
perl6/DBIish …/47-oracle-datetime.t :61:	my ($date, $datetime) = $sth.row;
perl6/Pod-To-HTML …/HTML.pm :80:	my ($pre, $post);
perl6/doc …/app.pl :70:	my ($temp_css, $temp_js) = ((tempfile)[1], (tempfile)[1]);
perl6/doc …/p6doc :131:	my ($package, $method) = $docee.split('.');
perl6/doc …/p6doc :279:	my (%indexes,$base-idx);
perl6/doc …/101-basics.pod6 :41:	my ($pairing, $result) = $line.split(' | ');
perl6/doc …/101-basics.pod6 :42:	my ($p1, $p2) = $pairing.words;
perl6/doc …/101-basics.pod6 :43:	my ($r1, $r2) = $result.split(':');
perl6/doc …/101-basics.pod6 :183:	my ($pairing, $result) = $line.split(' | ');
perl6/doc …/101-basics.pod6 :203:	my ($p1, $p2) = $pairing.words;
perl6/doc …/101-basics.pod6 :204:	my ($r1, $r2) = $result.split(':');
perl6/doc …/101-basics.pod6 :448:	my ($pairing, $result) = $line.split(' | ');
perl6/doc …/101-basics.pod6 :449:	my ($p1, $p2) = $pairing.split(' ');
perl6/doc …/5to6-nutshell.pod6 :151:	my($alpha, $beta); # Perl 5, tries to call my() sub in Perl 6
perl6/doc …/5to6-nutshell.pod6 :153:	my ($alpha, $beta); # Perl 6
perl6/doc …/5to6-nutshell.pod6 :339:	my ($line1, $line2) = read_2(*FILE);
perl6/doc …/5to6-nutshell.pod6 :347:	my ($fh) = @_;
perl6/doc …/5to6-nutshell.pod6 :351:	my ($line1, $line2) = read_2($in_file);
perl6/doc …/5to6-nutshell.pod6 :361:	my ($line1, $line2) = read-n($in-file, 2);
perl6/doc …/5to6-nutshell.pod6 :903:	while (my ($i, $v) = each(@array)) { ... } # Perl 5
perl6/doc …/5to6-nutshell.pod6 :908:	while (my ($k, $v) = each(%hash)) { ... } # Perl 5
perl6/doc …/5to6-nutshell.pod6 :1701:	my ( $foo, $bar ) = ( 42, 44 );
perl6/doc …/5to6-perlfunc.pod6 :190:	my ($subroutine, $package);
perl6/doc …/5to6-perlsyn.pod6 :27:	C<<while($x < 5)>> or C<my($x, $y)>). In Perl 6, that space is required,
perl6/doc …/5to6-perlsyn.pod6 :28:	thus C<<while ($x < 5)>> or C<my ($x, $y)>. In Perl 6, however, you can
perl6/doc …/faq.pod6 :943:	my ($prev, $current) = (1, 0);
perl6/doc …/functions.pod6 :198:	my ($n, $s) = a;
perl6/doc …/glossary.pod6 :653:	my ($a, $b); ($a, $b)
perl6/doc …/ipc.pod6 :36:	my ($sha, $subject) = $line.split: ' ', 2;
perl6/doc …/math.pod6 :24:	my (@union, @intersection);
perl6/doc …/math.pod6 :35:	my (@universe, @empty-set, @id-universe, @id-empty);
perl6/doc …/math.pod6 :67:	my ($de-Morgan1,$de-Morgan2) = (True,True);
perl6/doc …/operators.pod6 :298:	my ($a, $b, $c);
perl6/doc …/operators.pod6 :1108:	my ($x, $y) = 1,2;
perl6/doc …/operators.pod6 :1913:	my ($a, $b) = (1, 3);
perl6/doc …/operators.pod6 :1971:	my ($x, $y) = 42, 42.1;
perl6/doc …/optut.pod6 :35:	my ($num, $letter) = ('A', 3);
perl6/doc …/quoting.pod6 :159:	my ($x, $y, $z) = 4, 3.5, 3;
perl6/doc …/quoting.pod6 :480:	my ($first, $second) = qq:to/END1/, qq:to/END2/;
perl6/doc …/testing.pod6 :17:	=for code :preamble<my ($meta,$relaxed-name); sub check-name($meta,:$relaxed-name){}>
perl6/doc …/testing.pod6 :22:	=begin code :preamble<my ($meta,$relaxed-name); sub check-name($meta,:$relaxed-name){}>
perl6/doc …/traps.pod6 :382:	my ($a, $b) = (1,1);
perl6/doc …/traps.pod6 :393:	my ($a, $b) = (1,1);
perl6/doc …/variables.pod6 :143:	my ( @foo, $bar );
perl6/doc …/variables.pod6 :499:	my ( $foo, $bar );
perl6/doc …/variables.pod6 :570:	my (@a, $s, %h); # same as my @a; my $s; my %h;
perl6/doc …/variables.pod6 :579:	my (Str $a, Str $b, Int $c) = <a b>;
perl6/doc …/variables.pod6 :588:	my ($a) = f;
perl6/doc …/variables.pod6 :594:	my ($,$a,$,%h) = ('a', 'b', [1,2,3], {:1th});
perl6/doc …/Bag.pod6 :115:	my ($a, $b) = bag(2, 2, 4), bag(2, 3, 3, 4);
perl6/doc …/BagHash.pod6 :109:	my ($a, $b) = BagHash.new(2, 2, 4), BagHash.new(2, 3, 3, 4);
perl6/doc …/Block.pod6 :30:	my ($a, $b) = (2, 4);
perl6/doc …/CallFrame.pod6 :91:	method my(CallFrame:D:)
perl6/doc …/Dateish.pod6 :135:	my ($year, $week) = Date.new("2014-12-31").week;
perl6/doc …/Mix.pod6 :106:	=begin code :preamble<my ($this-mix, $that-mix);>
perl6/doc …/MixHash.pod6 :91:	my ($a, $b) = MixHash(2 => 2, 4), MixHash(2 => 1.5, 3 => 2, 4);
perl6/doc …/Rational.pod6 :139:	my ($non-rep, $repeating) = (19/3).base-repeating(10);
perl6/doc …/Set.pod6 :99:	my ($a, $b) = set(1, 2, 3), set(2, 4);
perl6/doc …/SetHash.pod6 :120:	my ($a, $b) = SetHash.new(1, 2, 3), SetHash.new(2, 4);
perl6/doc …/Signature.pod6 :36:	my ($a, @b) = 5, (6, 7, 8);
perl6/doc …/Sub.pod6 :22:	X<|my (Sub)>X<|our (Sub)>
perl6/doc …/htmlify.p6 :620:	my ( $sk, $name ) = @definitions;
perl6/doc …/htmlify.p6 :1065:	my ($tmp_fname, $tmp_io) = tempfile;
perl6/doc …/06-pod-htmlify.t :34:	my ($filename, $filehandle) = tempfile;
perl6/doc …/06-pod-htmlify.t :76:	my ($filename, $filehandle) = tempfile;
perl6/doc …/list-missing-methods.p6 :40:	my ($type-name, $method-names) = .split('#')[0].split(':')».trim;
perl6/doc …/manage-page-order.p6 :336:	my ($title, $subtitle) = ('', '');
perl6/doc …/unskip.p6 :46:	my ($test-file, $test-io) = tempfile(:suffix<.pod6>, :!unlink);
perl6/doc …/examples-compilation.t :129:	my ($tmp_fname, $tmp_io) = tempfile;
perl6/form …/Field.pm :87:	my ($ints, $fractions) = Form::NumberFormatting::obtain-number-parts(+$data);
perl6/perl6-http-server-async …/Async.pm6 :150:	my ($m, $u, $v) = (@lines.shift.match(/^(.+?)\s(.+)\s(HTTP\/.+)$/) // []).list.map({ .Str });
perl6/perl6-http-server-async …/Async.pm6 :157:	my ($k,$v) = $line.split(':', 2).map({.trim});
perl6/perl6-http-server-async …/Async.pm6 :193:	my ($i, $bytes) = 0,;
perl6/perl6-lwp-simple …/Simple.pm :61:	my ($scheme, $hostname, $port, $path, $auth) = self.parse_url($url);
perl6/perl6-lwp-simple …/Simple.pm :84:	my ($status, $resp_headers, $resp_content) =
perl6/perl6-lwp-simple …/Simple.pm :229:	my ($sock, Str $req_str);
perl6/perl6-lwp-simple …/Simple.pm :232:	my ($proxy, $proxy-port) = %*ENV<http_proxy>.split('/').[2].split(':');
perl6/perl6-lwp-simple …/Simple.pm :262:	my ($status, $resp_headers, $resp_content) = self.parse_response($resp);
perl6/perl6-lwp-simple …/Simple.pm :334:	my ($name, $value) = .split(': ');
perl6/perl6-lwp-simple …/parse-url.t :46:	my ($scheme, $host, $port, $path) = LWP::Simple.parse_url($url);
perl6/perl6-lwp-simple …/parse-url.t :55:	my ($scheme, $host, $port, $path) = LWP::Simple.parse_url('http://localhost:5984/foo/test/');
perl6/whateverable …/Bits.pm6 :64:	my ($seconds, $minutes, $hours, $days) = $time-left.polymod: 60, 60, 24;
perl6/whateverable …/Bits.pm6 :78:	my ($filename, $filehandle) = tempfile :!unlink;
perl6/whateverable …/Messages.pm6 :52:	my ($text, @files) = flat awesomify-exception $exception;
perl6/whateverable …/pull-rt :55:	my ($t) = $rt->show(type => 'ticket', id => $_);
perl6/whateverable …/Benchable.p6 :76:	my ($value, %additional-files) = self.process: $msg, ~$<config>, ~$<code>;
perl6/whateverable …/Coverable.p6 :113:	my ($filename, $lineno) = $line.split: /\s+/;
perl6/whateverable …/Greppable.p6 :43:	my ($path, $line-number, $text) = $line.split: “\x0”, 3;
perl6/whateverable …/Quotable.p6 :61:	my ($text, $id, $date) = .split: “\0”;
perl6/whateverable …/Releasable.p6 :58:	my ($seconds, $minutes, $hours, $days) = $time-left.polymod: 60, 60, 24;
perl6/whateverable …/Releasable.p6 :100:	my ($version, $changes, $version-old) = ~$0, ~$1, ~$2;
perl6/whateverable …/Reportable.p6 :77:	my ($from, $to) = $msg.Str.words;
perl6/whateverable …/Reportable.p6 :100:	my ($temp-folder,) = tempdir, :!unlink;
perl6/whateverable …/build.p6 :109:	my ($temp-folder,) = tempdir, :!unlink;
perlpilot/benchmark …/README :10:	my ($start,$end,$diff,$avg) = timethis(1000, "code");
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :16:	my ($h1,$h2);
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :19:	my ($tmp_rise_1,$tmp_set_1) = sun_rise_set($d, $lon, $lat, $altit, LHA-TO-DEGREES);
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :54:	my ($sr,$ss) = sunrise($date, $lon, $lat, $tz, $altit, :$isdst, :$iter);
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :55:	my ($rhr,$rmn) = split /\:/, $sr;
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :56:	my ($shr,$smn) = split /\:/, $ss;
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :74:	my ( $sRA, $sdec, $sr ) = sun_RA_dec($d);
perlpilot/p6-Astro-Sunrise …/Sunrise.pm6 :156:	my ( $r, $lon ) = sunpos($d);
perlpilot/p6-Astro-Sunrise …/01basic.t :13:	my ($lat, $long, $offset);
perlpilot/p6-Astro-Sunrise …/01basic.t :35:	my ($sunrise, $sunset) = sunrise( $test_year, $test_month, $test_day, $long, $lat, $offset );
perlpilot/p6-Astro-Sunrise …/01basic.t :63:	# my ($sunrise, $sunset) = sunrise($then.year, $then.month, $then.day, -118, 33, $offset, 0);
perlpilot/p6-File-Temp …/README.md :12:	my ($filename,$filehandle) = tempfile;
perlpilot/p6-File-Temp …/README.md :16:	my ($filename,$filehandle) = tempfile("******");
perlpilot/p6-File-Temp …/README.md :19:	my ($filename,$filehandle) = tempfile("******", :unlink);
perlpilot/p6-File-Temp …/README.md :22:	my ($filename,$filehandle) = tempfile(:tempdir("/path/to/my/dir"));
perlpilot/p6-File-Temp …/README.md :25:	my ($filename,$filehandle) = tempfile(:tempdir('.'), :!unlink);
perlpilot/p6-File-Temp …/README.md :28:	my ($filename,$filehandle) = tempfile(:prefix('foo'), :suffix(".txt"));
perlpilot/p6-File-Temp …/Temp.pm :122:	my ($filename,$filehandle) = tempfile;
perlpilot/p6-File-Temp …/Temp.pm :126:	my ($filename,$filehandle) = tempfile("******");
perlpilot/p6-File-Temp …/Temp.pm :129:	my ($filename,$filehandle) = tempfile("******", :unlink);
perlpilot/p6-File-Temp …/Temp.pm :132:	my ($filename,$filehandle) = tempfile(:tempdir("/path/to/my/dir"));
perlpilot/p6-File-Temp …/Temp.pm :135:	my ($filename,$filehandle) = tempfile(:tempdir('.'), :!unlink);
perlpilot/p6-File-Temp …/Temp.pm :138:	my ($filename,$filehandle) = tempfile(:prefix('foo'), :suffix(".txt"));
perlpilot/p6-File-Temp …/02-gc.t :7:	my ($fn, $fh) = tempfile;
perlpilot/p6-File-Temp …/03-tempfile.t :6:	my (@should-be-unlinked, @should-be-kept);
perlpilot/p6-File-Temp …/03-tempfile.t :37:	my ($name,$handle) = tempfile;
perlpilot/p6-HexDump-Tiny …/00-basic.t :6:	my ($result) = hexdump("foo");
perlpilot/p6-Locale-US …/US.pm :67:	my ($code,$state) = .split(':');
perlpilot/p6-Math-Trig …/Trig.pm :63:	my ($x, $y, $z) = spherical-to-cartesian($rho,$theta,$phi);
perlpilot/p6-Math-Trig …/03-radial.t :8:	my ($r,$t,$z) = cartesian-to-cylindrical(1,1,1);
perlpilot/p6-Math-Trig …/03-radial.t :31:	my ($r,$t,$f) = cartesian-to-spherical(1,1,1);
perlpilot/p6-Math-Trig …/03-radial.t :36:	my ($x,$y,$z) = spherical-to-cartesian($r,$t,$f);
perlpilot/p6-Math-Trig …/03-radial.t :54:	my ($r,$t,$z) = cylindrical-to-spherical(|spherical-to-cylindrical(1,1,1));
perlpilot/p6-Math-Trig …/04-great-circle.t :38:	my ($lon, $lat) = great-circle-waypoint(|@London, |@Tokyo, 0.0);
pierre-vigier/Perl6-Math-Matrix …/README.md :688:	my ($L, $U, $P) = $matrix.decompositionLU( );
pierre-vigier/Perl6-Math-Matrix …/README.md :690:	my ($L, $U) = $matrix.decompositionLUC(:!pivot);
pierre-vigier/Perl6-Math-Matrix …/README.md :695:	my ($L, $D, $U, $P) = $matrix.decompositionLU( :diagonal );
pierre-vigier/Perl6-Math-Matrix …/README.md :700:	my ($L, $U) = $matrix.decompositionLUCrout( );
pierre-vigier/Perl6-Math-Matrix …/Matrix.pm6 :225:	my ($shown-cols, $width-index);
pierre-vigier/Perl6-Math-Matrix …/Matrix.pm6 :416:	my ($L, $U, $P) = $.decompositionLU();
pierre-vigier/Perl6-Math-Matrix …/Matrix.pod :798:	my ($L, $U, $P) = $matrix.decompositionLU( );
pierre-vigier/Perl6-Math-Matrix …/Matrix.pod :800:	my ($L, $U) = $matrix.decompositionLUC(:!pivot);
pierre-vigier/Perl6-Math-Matrix …/Matrix.pod :808:	my ($L, $D, $U, $P) = $matrix.decompositionLU( :diagonal );
pierre-vigier/Perl6-Math-Matrix …/Matrix.pod :813:	my ($L, $U) = $matrix.decompositionLUCrout( );
pierre-vigier/Perl6-Math-Matrix …/041-decomposition.t :10:	my ( $L, $U, $P ) = $matrix.decompositionLU();
pierre-vigier/Perl6-Math-Matrix …/041-decomposition.t :21:	my ($L, $U) = $matrix.decompositionLUCrout();
pmqs/Archive-SimpleZip …/Utils.pm6 :53:	my ($volume, $directories, $file) =
pmqs/Archive-SimpleZip …/004-canonical.t :38:	my ($input, $expected) = |$r;
pmqs/Archive-SimpleZip …/004-canonical.t :48:	my ($input, $expected) = |$r;
pmqs/Archive-SimpleZip …/004-canonical.t :72:	my ($input, $expected) = |$r;
pmqs/Archive-SimpleZip …/ZipTest.pm6 :13:	my ($filename,$filehandle) = tempfile(:tempdir($base_dir));
ppentchev/perl6-Getopt-Std …/Std.pm6 :64:	my ($opt, $value) = $pair.kv;
raydiak/Git-PurePerl …/PurePerl.pm :45:	my ( $dir, $base, $names ) = @_;
raydiak/Git-PurePerl …/PurePerl.pm :72:	my ( $sha1, my $name ) = split ' ', $line;
raydiak/Git-PurePerl …/PurePerl.pm :126:	my ( $sha1, $name ) = split ' ', $line;
raydiak/Git-PurePerl …/PurePerl.pm :179:	my ( $self, @sha1s ) = @_;
raydiak/Git-PurePerl …/PurePerl.pm :186:	my ( $kind, $size, $content ) = $pack.get_object($sha1);
raydiak/Git-PurePerl …/PurePerl.pm :195:	my ( $self, $sha1 ) = @_;
raydiak/Git-PurePerl …/PurePerl.pm :197:	my ( $kind, $size, $content ) = $self->loose->get_object($sha1);
raydiak/Git-PurePerl …/PurePerl.pm :267:	my ( $self, $object, $ref ) = @_;
raydiak/Git-PurePerl …/PurePerl.pm :288:	my ( $class, %arguments ) = @_;
raydiak/Git-PurePerl …/Commit.pm :29:	my ( $key, $value ) = split ' ', $line, 2;
raydiak/Git-PurePerl …/Commit.pm :40:	my ( $email, $epoch, $tz ) = splice( @data, *-3 );
raydiak/Git-PurePerl …/Tag.pm :20:	my ( $key, $value ) = split ' ', $line, 2;
raydiak/Git-PurePerl …/Tag.pm :24:	my ($email, $epoch, $tz) = splice(@data, *-3);
raydiak/Git-PurePerl …/Pack.pm :21:	my ( $self, $want_sha1 ) = @_;
raydiak/Git-PurePerl …/Pack.pm :128:	my ( $src_size, $pos ) = self.patch_delta_header_size( $delta, 0 );
raydiak/Git-PurePerl …/Version1.pm :42:	my ( $first, $last ) = @offsets[ $slot, $slot + 1 ];
raydiak/Git-PurePerl …/Version2.pm :43:	my ( $sha1, $crc, $offset ) = @$data;
raydiak/Git-PurePerl …/Version2.pm :57:	my ( $first, $last ) = @offsets[ $slot, $slot + 1 ];
raydiak/Git-PurePerl …/Protocol.pm :54:	my ( $sha1, $name ) = ~«@($line ~~ /^ (<[a..z0..9]>+) ' ' (.*?) [ \0 | \n | $ ]/);
raydiak/Git-PurePerl …/Loose.pm :17:	my ( $self, $sha1 ) = @_;
raydiak/Git-PurePerl …/Loose.pm :25:	my ( $kind, $size, $content ) = $data =~ /^(\w+) (\d+)\0(.*)$/s;
raydiak/Git-PurePerl …/Loose.pm :30:	my ( $self, $object ) = @_;
raydiak/Git-PurePerl …/File.pm :15:	my ($read, $write);
raydiak/Git-PurePerl …/SSH.pm :17:	my ($read, $write);
raydiak/Image-PNG-Portable …/mandelbrot.p6 :19:	my ($max-x, $max-y) = $width - 1, $height - 1;
raydiak/Image-PNG-Portable …/mandelbrot.p6 :22:	my ($r_e, $g_e, $b_e) =
raydiak/Image-PNG-Portable …/mandelbrot.p6 :41:	my ($re, $im) = $c.re, $c.im;
raydiak/Image-PNG-Portable …/mandelbrot.p6 :53:	my ($r, $g, $b) =
raydiak/Inline-Lua …/Object.pm6 :74:	my $lua = self.lua; my ($raw, $state) = $lua.raw, $lua.state;
raydiak/Inline-Lua …/Object.pm6 :87:	my $lua = self.lua; my ($raw, $state) = $lua.raw, $lua.state;
raydiak/Math--ThreeD …/gen-mat44.p6 :38:	intro => 'my ($sin, $cos) = sin($a), cos($a);',
raydiak/Math--ThreeD …/gen-mat44.p6 :50:	intro => 'my ($sin, $cos) = sin($a), cos($a);',
raydiak/Math--ThreeD …/gen-mat44.p6 :62:	intro => 'my ($sin, $cos) = sin($a), cos($a);',
raydiak/Math--ThreeD …/gen-vec3.p6 :88:	intro => 'my ($sin, $cos) = sin($b), cos($b);',
raydiak/Math--ThreeD …/gen-vec3.p6 :99:	intro => 'my ($sin, $cos) = sin($b), cos($b);',
raydiak/Math--ThreeD …/gen-vec3.p6 :110:	intro => 'my ($sin, $cos) = sin($b), cos($b);',
raydiak/Math-Symbolic …/Symbolic.pm6 :941:	my ($type, $content);
raydiak/Math-Symbolic …/Grammar.pm6 :19:	my (@circ, @pre, @post, %in);
raydiak/Math-Symbolic …/Grammar.pm6 :108:	my (@in_terms, @in_chains);
raydiak/Math-Symbolic …/Grammar.pm6 :110:	my ($term, $chain);
raydiak/pray …/Cone.pm6 :18:	my ($ray_pos, $ray_dir) = .position, .direction given $ray;
raydiak/pray …/Cube.pm6 :19:	my ($ray_pos, $ray_dir) = .position, .direction given $ray;
raydiak/pray …/Cylinder.pm6 :17:	my ($ray_pos, $ray_dir) = .position, .direction given $ray;
raydiak/pray …/Matrix3D.pm6 :53:	my ($x, $y);
raydiak/pray …/Matrix3D.pm6 :60:	my ($sin, $cos) = .sin, .cos given $angle;
raydiak/pray …/Matrix3D.pm6 :132:	my ($dim0, $dim1) = $m.values.end, $!values[0].end;
raydiak/pray …/Sphere.pm6 :17:	my ($ray_pos, $ray_dir) = .position, .direction given $ray;
raydiak/pray …/Vector3D.pm6 :175:	my ($sin, $cos) = sin($angle), cos($angle);
raydiak/pray …/Output.pm6 :156:	my ($px, $py) = self.coord_preview($x,$y);
raydiak/pray …/Camera.pm6 :48:	my ($x, $y, $z) = .x, .y, .z given $!object.subtract($!position);
raydiak/pray …/Camera.pm6 :57:	my ($theta, $phi) = @!polar;
retupmoca/P6-Net-AMQP …/Frame.pm6 :18:	my ($type, $channel, $size) = $header.unpack('CnN');
retupmoca/P6-Net-AMQP …/Frame.pm6 :50:	my ($type, $channel, $size) = $data.unpack('CnN');
retupmoca/P6-Net-AMQP …/Method.pm6 :118:	my ($class-id, $method-id) = $data.unpack('nn');
retupmoca/P6-Net-AMQP …/Method.pm6 :169:	my ($class, $method) = $method-name.split('.');
retupmoca/P6-Net-AMQP …/31-tutorial-one.t :49:	my ( $receiver, $receiver-promise) = await $start-promise;
retupmoca/P6-Net-AMQP …/32-tutorial-two.t :56:	my ( $receiver, $receiver-promise) = await $start-promise;
retupmoca/P6-Net-DNS …/Header.pm6 :22:	my ($id, $flags, $qdcount, $ancount, $nscount, $arcount) = $data.unpack('nnnnnn');
retupmoca/P6-Net-DNS …/Question.pm6 :20:	my ($qtype, $qclass) = $data.unpack('nn');
retupmoca/P6-Net-DNS …/Resource.pm6 :35:	my ($type, $class, $ttl, $rdlength) = $data.unpack('nnNn');
retupmoca/P6-Net-DNS …/SOA.pm6 :40:	my ($serial, $refresh, $retry, $expire, $minimum) = $data.unpack('NNNNN');
retupmoca/P6-Net-DNS …/SRV.pm6 :19:	my ($priority, $weight, $port) = $.rdata.unpack('nnn');
salortiz/JsonC …/benchmark.pl6 :8:	my (@repos, $target, $pandadir);
salortiz/JsonC …/00-basic.t :64:	my (@repos, $target, $pandadir);
salortiz/NativeHelpers-Blob …/CompileTestLib.pm :6:	my ($c_line, $l_line);
salortiz/NativeHelpers-Blob …/CompileTestLib.pm :47:	my (@fails, $succeeded);
salortiz/p6-LMDB …/LMDB.pm6 :539:	my ($key, $data);
samcv/perl6-Git-Log …/Log.pm6 :120:	my ($added, $removed, $filename) = $line.split("\t", 3);
samgwise/p6-algorithm-genetic …/Crossoverable.t :17:	my ($c, $d) = |$a.crossover($b, 1/2);
samgwise/p6-algorithm-genetic …/Crossoverable.t :34:	my ($c, $d) = |$a.crossover($b, 1/2);
scovit/Scheduler-DRMAA …/Job-template.pm6 :280:	my ($start, $end) = $range.minmax;
sergot/IO-Capture-Simple …/e2.p6 :4:	my ($out, $err, $in) = capture { print "OUT"; note "ERR"; prompt "IN> " }
sergot/IO-Capture-Simple …/Simple.pm :8:	my ($out, $err, $in);
sergot/http-useragent …/Message.pm6 :193:	my ($first, $second, $third);
sergot/http-useragent …/Message.pm6 :207:	my ($k, $v) = $line.split(/\:\s*/, 2);
sergot/http-useragent …/Request.pm6 :29:	my ($method, $url, $file, %fields, $uri);
sergot/http-useragent …/Request.pm6 :198:	my ($k, $v) = $_.key, $_.value;
sergot/http-useragent …/Request.pm6 :205:	my ($file, $usename, @headers) = @$v;
sergot/http-useragent …/Response.pm6 :23:	my ( $rl, $header ) = $header-chunk.decode('ascii').split(/\r?\n/, 2);
sergot/http-useragent …/UserAgent.pm6 :351:	my ($proxy_host, $proxy_auth) = $http_proxy.split('/').[2].split('@', 2).reverse;
sergot/io-socket-ssl …/SSL.pm6 :10:	my ($host, $port) = ($uri ~~ /^'[' (.+) ']' \: (\d+)$/)[0, 1];
sergot/io-socket-ssl …/SSL.pm6 :38:	my ($host, $port) = %args<family> && %args<family> == PIO::PF_INET6()
sergot/io-socket-ssl …/SSL.pm6 :47:	my ($peer, $port) = %args<family> && %args<family> == PIO::PF_INET6()
shantanubhadoria/p6-Printer-ESCPOS …/ESCPOS.pm6 :371:	my ($nH, $nL) = self!split-bytes($horizontalPosition, 2);
shantanubhadoria/p6-Printer-ESCPOS …/ESCPOS.pm6 :384:	my ($nH, $nL) = self!split-bytes($leftMargin, 2);
shantanubhadoria/p6-Printer-ESCPOS …/ESCPOS.pm6 :403:	my ($nH, $nL) = self!split-bytes($width, 2);
shinobi/Data-StaticTable …/StaticTable.pm6 :60:	my ($rows, @additional-cells) = self!calculate-dimensions(@header.elems, @new-data.elems, $filler);
shinobi/Data-StaticTable …/StaticTable.pm6 :92:	my (@data, @xeno-hash, %xeno-array); #-- @xeno will be used ONLY if rejected-rows is provided
skaji/perl6-MetaCPAN-Favorite …/Favorite.pm6 :90:	my ($date, $name) = $line.split(" ", 2);
skids/perl6-Proc-Screen …/Screen.pm6 :115:	my ($fn, $fh) = |tempfile();
skids/perl6-Proc-Screen …/Screen.pm6 :117:	my ($height, $scrollback) = +«$/[0,1];
skids/perl6-Proc-Screen …/base.t :23:	my ($fn, $fh) = |tempfile;
skids/perl6sum …/MD.pm6 :94:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :101:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[4,5,6,7];
skids/perl6sum …/MD.pm6 :108:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :116:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[4,5,6,7];
skids/perl6sum …/MD.pm6 :124:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :131:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[4,5,6,7];
skids/perl6sum …/MD.pm6 :138:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :146:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :154:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :161:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[0,1,2,3];
skids/perl6sum …/MD.pm6 :168:	my ($a is rw, $b is rw, $c is rw, $d is rw, $e is rw) :=
skids/perl6sum …/MD.pm6 :176:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[$lr X+ ^4];
skids/perl6sum …/MD.pm6 :183:	my ($a is rw, $b is rw, $c is rw, $d is rw, $e is rw) :=
skids/perl6sum …/MD.pm6 :191:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[$lr X+ ^4];
skids/perl6sum …/MD.pm6 :198:	my ($a is rw, $b is rw, $c is rw, $d is rw, $e is rw) :=
skids/perl6sum …/MD.pm6 :206:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[$lr X+ ^4];
skids/perl6sum …/MD.pm6 :213:	my ($a is rw, $b is rw, $c is rw, $d is rw, $e is rw) :=
skids/perl6sum …/MD.pm6 :221:	my ($a is rw, $b is rw, $c is rw, $d is rw) := @!s[$lr X+ ^4];
skids/perl6sum …/MD.pm6 :228:	my ($a is rw, $b is rw, $c is rw, $d is rw, $e is rw) :=
skids/perl6sum …/Recourse.pm6 :150:	my ($mod, $alg) = findalg;
skids/perl6sum …/Recourse.pm6 :165:	my ($mod, $alg) = findalg;
skids/perl6sum …/SHA.pm6 :112:	# my ($a, $b, $c, $d, $e) := @s[0..^*];
skids/perl6sum …/SHA.pm6 :337:	my ($a,$b,$c,$d,$e,$f,$g,$h) = @.s.values;
skids/perl6sum …/SHA.pm6 :410:	my ($a,$b,$c,$d,$e,$f,$g,$h) = @.s.values;
skids/perl6sum …/SM3.pm6 :98:	my ($A, $B, $C, $D, $E, $F, $G, $H) = @!V;
skids/perl6sum …/SipHash.pm6 :204:	my ($v0, $v1, $v2, $v3) = $!v0, $!v1, $!v2, $!v3;
skids/perl6sum …/Tiger.pm6 :372:	my (Int $x0, Int $x1, Int $x2, Int $x3,
skids/perl6sum …/Tiger.pm6 :412:	my ($ta0, $ta1, $ta2, $ta3) =
skids/perl6sum …/Tiger.pm6 :415:	my ($tb0, $tb1, $tb2, $tb3) =
skids/perl6sum …/Tiger.pm6 :429:	my (Int $a, Int $b, Int $c) = @!s;
skids/perl6sum …/crc.t :11:	my ($i, $s);
skinkade/p6-crypt-argon2 …/README.md :36:	> my ($key, $meta) = argon2-derive-key("password", :hashlen(16))
skinkade/p6-crypt-argon2 …/02-derive-key.t :9:	my ($key, $meta) = argon2-derive-key("password");
softmoth/p6-Template-Mustache …/Mustache.pm :220:	my ($*LEFT, $*RIGHT) = $delims ?? @$delims !! ( '{{', '}}' );
softmoth/p6-Template-Mustache …/Mustache.pm :316:	my ($datum, $lambda) = get(@context, %val<val>, :section);
softmoth/p6-Template-Mustache …/TestUtil.pm :6:	my ($file, $start) = '', 0;
spebern/Parser-FreeXL-Native …/README.md :23:	my ($max_row, $max_col) = $parser.sheet_dimensions;
spebern/Parser-FreeXL-Native …/Native.pm6 :204:	my ($max_row, $max_col) = $parser.sheet_dimensions;
spebern/Parser-FreeXL-Native …/01-basic.t :28:	my ($rows, $cols) = $parser.sheet_dimensions;
spitsh/spitsh …/Constants.pm6 :31:	my ($prec,$assoc) = %precedence{.<sym>.Str};
spitsh/spitsh …/Exceptions.pm6 :295:	my ($from,$hint);
spitsh/spitsh …/Actions.pm6 :239:	my ($if,$last,$this);
spitsh/spitsh …/Actions.pm6 :392:	my (:@pos,:%named) := $<param-def>.ast<paramlist>.ast;
spitsh/spitsh …/Actions.pm6 :492:	my ($precedence,$assoc) = $this.&derive-precedence(@terms[$i]);
spitsh/spitsh …/Actions.pm6 :542:	method term:my ($/) {
spitsh/spitsh …/Actions.pm6 :700:	my (:@pos,:%named) := $<call-args><args>.ast || Empty;
spitsh/spitsh …/Actions.pm6 :706:	my (:@pos,:%named) := $<args>.ast;
spitsh/spitsh …/Actions.pm6 :739:	my ($key,$value,$match);
spitsh/spitsh …/Actions.pm6 :846:	my (:@pos,:%named) := $<args>.ast;
spitsh/spitsh …/Actions.pm6 :868:	named => $<named>.map({ my ($k,$v) := .ast; ($k.val, $v) }).flat.Hash,
spitsh/spitsh …/Actions.pm6 :999:	my (SAST:D @pos,SAST:D %set-env,SAST:D @write,SAST:D @append,SAST:D @in);
spitsh/spitsh …/Actions.pm6 :1014:	my (@add-write,@add-append,@add-in) := .ast;
spitsh/spitsh …/Actions.pm6 :1074:	my (@write,@append,@in);
spitsh/spitsh …/Regex.pm6 :35:	my ($o, $c) = (~$<opener>,~$<closer>);
spitsh/spitsh …/Composer.pm6 :215:	my ($topic,$pattern);
spitsh/spitsh …/Stage2-Util.pm6 :13:	my (@pos-params,%named-params) := ($signature.pos,$signature.named);
spitsh/spitsh …/cli.pm6 :310:	my ($docker,$promise) = do with %cli<in-docker> {
spitsh/spitsh …/cli.pm6 :372:	my ($helper-builder, $p) = start-docker('alpine', :docker-socket);
stmuk/p6-String-Koremutake …/Koremutake.pm :13:	my (%phoneme_to_number, %number_to_phoneme);
stmuk/p6-app-p6tags …/p6tags :6:	my (@tags, $fullpack);
supernovus/flower …/Date.pm6 :24:	my ($year, $month, $day, $hour, $minute, $second, %params) =
supernovus/flower …/Date.pm6 :71:	my ($format, $date, $timezone) =
supernovus/flower …/TAL.pm6 :45:	my ($attrib, $query) = $statement.split(/\s+/, 2);
supernovus/flower …/TAL.pm6 :85:	my ($attrib, $query) = $statement.split(/\s+/, 2);
supernovus/flower …/TAL.pm6 :95:	my ($attrib, $query) = $xml.attribs{$tag}.split(/\s+/, 2);
supernovus/flower …/TALES.pm6 :78:	my ($handler, $subquery) = $query.split(/\:\s*/, 2);
supernovus/flower …/TALES.pm6 :225:	my ($command, *@args) = self.get-args(:query({0=>0}), $path);
supernovus/flower …/List.pm6 :23:	my ($array, $num) = $.tales.get-args(:query({1=>1}), $query, 1);
supernovus/flower …/List.pm6 :41:	my ($array, $num) = $.tales.get-args(:query({1=>1}), $query, 1);
supernovus/flower …/List.pm6 :50:	my ($array, $num) = $.tales.get-args(:query({1=>1}), $query, *);
supernovus/flower …/Text.pm6 :45:	my ($subquery, $start, $chars, $ellipsis) =
supernovus/flower …/Text.pm6 :61:	my ($format, $text) = $.tales.get-args(:query, $query, Nil);
supernovus/hinges …/Markup.pm :70:	my ($kind, $data, $pos) = @($event);
supernovus/hinges …/Markup.pm :103:	my ($kind, $data, $pos) = @event;
supernovus/hinges …/Output.pm :12:	my ($kind, $data, $pos) = @($_);
supernovus/hinges …/Output.pm :15:	my ($tag, $attribs) = @($data);
supernovus/hinges …/Output.pm :19:	my ($attr, $value) = @($attrib);
supernovus/hinges …/05-input.t :26:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :36:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :47:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :49:	my ($tag, $attrib) = @($data);
supernovus/hinges …/05-input.t :59:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :69:	## my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :81:	## my ($kind, $data, $pos) = @events[2];
supernovus/hinges …/05-input.t :93:	## my ($kind, $data, $pos) = @events[2];
supernovus/hinges …/05-input.t :101:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :109:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :143:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :153:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :164:	## my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :174:	## my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :175:	## my ($tag, $attrib) = @($data);
supernovus/hinges …/05-input.t :184:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :192:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :203:	my ($kind, $data, $pos) = @events[1];
supernovus/hinges …/05-input.t :211:	my ($kind, $td, $pos) = @events[0];
supernovus/hinges …/05-input.t :212:	my ($target, $data) = $td;
supernovus/hinges …/05-input.t :221:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :222:	my ($version, $encoding, $standalone) = $data;
supernovus/hinges …/05-input.t :232:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :233:	my ($version, $encoding, $standalone) = $data;
supernovus/hinges …/05-input.t :243:	my ($kind, $data, $pos) = @events[0];
supernovus/hinges …/05-input.t :244:	my ($version, $encoding, $standalone) = $data;
supernovus/hinges …/05-input.t :254:	my ($kind, $dt, $pos) = @events[0];
supernovus/hinges …/05-input.t :255:	my ($target, $data) = $dt;
supernovus/perl6-fastcgi …/Connection.pm6 :28:	my ($type, $id, $content-length) = parse_header($header);
supernovus/perl6-fastcgi …/Protocol.pm6 :125:	my ($type, $request-id, $content-length) = parse_header($octets);
supernovus/perl6-fastcgi …/Protocol.pm6 :403:	my ($content-length, $padding-length) = $octets.unpack(FCGI_GetRecordLength);
supernovus/perl6-http-client …/Response.pm6 :31:	my ($protocol, $status, $message) = $status_line.split(/\s/);
supernovus/perl6-http-client …/Response.pm6 :39:	my ($name, $value) = $line.split(': ');
supernovus/perl6-http-easy …/Easy.pm6 :122:	my ($method, $uri, $protocol) = $request.split(/\s/);
supernovus/perl6-http-easy …/Easy.pm6 :132:	my ($path, $query) = $uri.split('?', 2);
supernovus/perl6-http-easy …/Easy.pm6 :145:	my ($key, $value) = $header.split(': ');
supernovus/perl6-mime-types …/Types.pm6 :17:	my ($ctype, @exts) = $line.split(/\s+/);
supernovus/perl6-text-table-list …/List.pm6 :87:	my ($name, $value) = $field.kv;
supernovus/perl6-web …/Test.pm6 :33:	my ($path, $query) = $uri.split('?', 2);
supernovus/perl6-web …/Request.pm6 :174:	my ($key, $value) = unescape($param).split('=', 2);
supernovus/perl6-web …/Request.pm6 :184:	my ($key, $value) = unescape($cookie).split('=', 2);
supernovus/perl6-web …/Multipart.pm6 :31:	my ($name, $values) = $header.split(': ', 2);
supernovus/perl6-web …/Multipart.pm6 :32:	my ($value, @opts) = $values.split(/';'\s*/);
supernovus/perl6-web …/Multipart.pm6 :35:	my ($key, $val) = $opt.split('=', 2);
supernovus/perl6-web …/form.p6 :45:	my ($fakens, $tempfile, $filename) = $context.path.split('/');
szabgab/Perl6-Maven …/Authors.pm6 :8:	my ($author, $name, $img, $google) = $line.split(/\;/);
szabgab/Perl6-Maven …/Page.pm6 :31:	my ($field, $value) = $0, $1;
szabgab/Perl6-Maven …/Tools.pm6 :22:	my ($level, @msg) = @_;
szabgab/Perl6-Maven …/Tools.pm6 :107:	my ($key, $value) = $line.split('=');
szabgab/Perl6-Maven …/10-launch.t :40:	:my($[[{:title("Hello World - scalar variables"), :url("/tutorial/perl6-hello-world-scalar")},],]),
szabgab/Perl6-Maven …/archive.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/alert.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/bottom_navigation.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/disqus.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/footer.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/header.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/newsletter.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/social_sharing.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/top_navigation.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/index.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/main.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/page.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/slides_chapter.tmpl :1:	% my (%h) = @_;
szabgab/Perl6-Maven …/slides_toc.tmpl :1:	% my (%h) = @_;
szabgab/perl6-Pod-Parser …/pod2html.pl6 :5:	my ($infile, $outfile) = @*ARGS;
taboege/p6-SAT-Solver-MiniSAT …/SimpSolver.cc :65:	vec<Lit> dummy(1,lit_Undef);
tadzik/Getopt-Type …/Type.pm :8:	my (%accepted, $results);
tadzik/Getopt-Type …/Type.pm :11:	my ($short, $long) = .split('|');
tadzik/Grammar-BNF …/generate.t :8:	my ($t, $p);
tadzik/Module-Toolkit …/Ecosystem.pm :51:	my ($buf, $g) = '';
tadzik/Template-Mojo …/complex.tm :1:	% my (%h) = @_;
tadzik/Template-Mojo …/hash.tm :1:	% my ($x) = @_;
tadzik/Template-Mojo …/param.tm :1:	% my ($x) = @_;
tadzik/Template-Mojo …/Mojo.pm :173:	% my ($x) = @_;
tadzik/Template-Mojo …/Mojo.pm :206:	% my ($x) = @_;
tadzik/Template-Mojo …/Mojo.pm :231:	% my (%h) = @_;
tadzik/Template-Mojo …/00-basic.t :21:	[["% my (\$a, \$b) = \@_\n<%= \$a %> and <%= \$b %>", 5, 7], '5 and 7', 'code'],
tadzik/Template-Mojo …/00-basic.t :28:	my ($tmpl, @params) = $c[0].WHAT === Str ?? ($c[0]) !! $c[0].list;
tadzik/panda …/Ecosystem.pm :21:	my ($mod, $state, $json) = split ' ', $line, 3;
tadzik/panda …/Ecosystem.pm :96:	my ($buf, $g) = '';
tadzik/panda …/Reporter.pm :22:	my ($host, $port) = %*ENV<http_proxy>.split('/').[2].split(':');
tadzik/panda …/Tester.pm :29:	my ( :$output, :$stdout, :$stderr, :$passed ) := run-and-gather-output(@opts);
thundergnat/Lingua-EN-Numbers-Cardinal …/Cardinal.pm6 :29:	my ($num, $denom) = $rat.nude;
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 :145:	my ($whole, $fraction) = $mantissa.split('.');
thundergnat/Lingua-EN-Numbers-Cardinal …/Cardinal.pm6 :159:	my ($, $cen) = $year.flip.comb(/\d ** 1..2/);
thundergnat/Lingua-EN-Numbers-Cardinal …/Cardinal.pm6 :162:	my ($l, $h) = $year.flip.comb(/\d ** 1..2/).».flip;
thundergnat/Timer …/01-basic.t :6:	my ($answer, $time) = timer { my $i = sum((1..1000) »R/» 1) for ^10; $i }
thundergnat/X11-Xdo …/README.md :33:	my ($x, $y, $window-id, $screen) = $xdo.get-mouse-info;
thundergnat/X11-Xdo …/libxdo.pm6 :45:	my ($x, $y, $window-id, $screen) = $xdo.get-mouse-info;
thundergnat/X11-Xdo …/libxdo.pm6 :1247:	my ($x, $y) = self.get-window-location($window);
thundergnat/X11-Xdo …/libxdo.pm6 :1248:	my ($width, $height) = self.get-window-size($window);
thundergnat/X11-Xdo …/02-window-move.t :7:	my ($w, $h ) = $xdo.get-window-size( $id );
thundergnat/X11-Xdo …/02-window-move.t :8:	my ($wx, $wy) = $xdo.get-window-location( $id );
thundergnat/X11-Xdo …/02-window-move.t :9:	my ($dw, $dh) = $xdo.get-desktop-dimensions( 0 );
thundergnat/X11-Xdo …/03-window-size.t :8:	my ($w, $h ) = $xdo.get-window-size( $id );
thundergnat/X11-Xdo …/03-window-size.t :9:	my ($wx, $wy) = $xdo.get-window-location( $id );
thundergnat/X11-Xdo …/03-window-size.t :10:	my ($dw, $dh) = $xdo.get-desktop-dimensions( 0 );
thundergnat/X11-Xdo …/05-mouse-move.t :5:	my ($dw, $dh) = $xdo.get-desktop-dimensions( 0 );
thundergnat/X11-Xdo …/05-mouse-move.t :12:	my ($x, $y, $window-id, $screen) = $xdo.get-mouse-info;
titsuki/p6-Algorithm-Kruskal …/01-basic.t :9:	my ($vertex-size, $num-of-edges) = @header-elems[0,1]>>.Int;
titsuki/p6-Algorithm-Kruskal …/01-basic.t :14:	my ($from, $to) = @line-elems[0,1]>>.Int;
tokuhirom/p6-Cookie-Baker …/Baker.pm6 :61:	my ($key, $value) = split( "=", $pair, 2 );
tokuhirom/p6-Cookie-Baker …/01_bake.t :31:	my ($name, $value, $opts, $expected) = @$_;
tokuhirom/p6-Cookie-Baker …/02_crush.t :24:	my ($cookie, $parsed) = @$_;
tokuhirom/p6-Crust …/mojo.p6w :7:	% my ($name) = @_;
tokuhirom/p6-Crust …/Directory.pm6 :47:	my ($file, $path-info, $error-res) = $!dir || self.locate-file($env);
tokuhirom/p6-Crust …/File.pm6 :24:	my ($file, $path-info, $error-res) = $!file || self.locate-file($env);
tokuhirom/p6-Crust …/File.pm6 :51:	my ($file, @path-info);
tokuhirom/p6-Crust …/Basic.pm6 :51:	my ($user, $pass) = decode-token($0.Str);
tokuhirom/p6-Crust …/Lint.pm6 :75:	my ($key, $val) = $v.kv;
tokuhirom/p6-Crust …/ReverseProxy.pm6 :24:	my ($ip) = %env<HTTP_X_FORWARDED_FOR> ~~ /(<-[, \s]>+)$/;
tokuhirom/p6-Crust …/ReverseProxy.pm6 :36:	my ($host) = %env<HTTP_X_FORWARDED_SERVER> ~~ /(<-[, \s]>+)$/;
tokuhirom/p6-Crust …/ReverseProxy.pm6 :46:	my ($host) = %env<HTTP_X_FORWARDED_HOST> ~~ /(<-[, \s]>+)$/;
tokuhirom/p6-Crust …/Request.pm6 :58:	my ($k, $v) = @($_.split(/\=/, 2));
tokuhirom/p6-Crust …/Request.pm6 :101:	my ($type, %opts) = parse-header-item(self.content-type);
tokuhirom/p6-Crust …/Request.pm6 :108:	my ($params, $uploads) = self!parse-multipart-parser(%opts<boundary>.encode('ascii'));
tokuhirom/p6-Crust …/Request.pm6 :134:	my ($first, %opts);
tokuhirom/p6-Crust …/Request.pm6 :136:	my ($tempfilepath, $tempfilefh);
tokuhirom/p6-Crust …/Request.pm6 :144:	my ($cd) = $headers<content-disposition>;
tokuhirom/p6-Crust …/Utils.pm6 :15:	my ($first, @items) = split(/\s*\;\s*/, $header);
tokuhirom/p6-Crust …/Utils.pm6 :19:	my ($k, $v) = @(.split(/\=/));
tokuhirom/p6-Crust …/directory.t :21:	my ($req, $res);
tokuhirom/p6-Crust …/file.t :24:	my ($req, $res);
tokuhirom/p6-Crust …/urlmap.t :18:	my ($req, $res);
tokuhirom/p6-Crust …/auth_basic.t :22:	my ($req, $res);
tokuhirom/p6-Crust …/reverse-proxy.t :160:	my ($tag, %test) = $test.kv;
tokuhirom/p6-Crust …/static.t :32:	my ($req, $res);
tokuhirom/p6-Crust …/utils.t :14:	my ($head, %opts) = parse-header-item('form-data; name="upload"; filename="hello.pl"');
tokuhirom/p6-Getopt-Tiny …/Tiny.pm6 :384:	my ($short, $long, $type) = @(GetoptionsGrammar.parse($def, :actions(GetoptionsAction)).made);
tokuhirom/p6-HTTP-MultiPartParser …/PAML.pm :22:	my ($path, $struct) = @_;
tokuhirom/p6-HTTP-MultiPartParser …/PAML.pm :48:	my ($path) = @_;
tokuhirom/p6-HTTP-MultiPartParser …/035_headers.t :50:	my ($content, $exp_parts, $exp_error) = @$test;
tokuhirom/p6-HTTP-MultiPartParser …/035_headers.t :52:	my ($got_parts, $got_error) = parse($content);
tokuhirom/p6-HTTP-MultiPartParser …/040_malformed.t :62:	my ($content, $exp_parts, $exp_error) = @$test;
tokuhirom/p6-HTTP-MultiPartParser …/040_malformed.t :64:	my ($got_parts, $got_error) = parse($content);
tokuhirom/p6-HTTP-Parser …/README.md :13:	my ($result, $env) = parse-http-request("GET / HTTP/1.0\x0d\x0acontent-type: text/html\x0d\x0a\x0d\x0a".encode("ascii"));
tokuhirom/p6-HTTP-Parser …/README.md :25:	* `my ($result, $env) = sub parse-http-request(Blob[uint8] $req) is export`
tokuhirom/p6-HTTP-Parser …/Parser.pm6 :129:	my ($result, $env) = parse-http-request("GET / HTTP/1.0\x0d\x0acontent-type: text/html\x0d\x0a\x0d\x0a".encode("ascii"));
tokuhirom/p6-HTTP-Parser …/Parser.pm6 :139:	=item C<my ($result, $env) = sub parse-http-request(Blob[uint8] $req) is export>
tokuhirom/p6-HTTP-Parser …/01-request-parser.t :88:	my ($req, $expected) = @($_);
tokuhirom/p6-HTTP-Parser …/01-request-parser.t :90:	my ($retval, $env) = parse-http-request($req.encode('ascii'));
tokuhirom/p6-HTTP-Parser …/02-issue-4.t :16:	my ($retval, $env) = parse-http-request($buf);
tokuhirom/p6-HTTP-Server-Tiny …/moar-profiler-cli.pl :50:	my ($node) = @_;
tokuhirom/p6-HTTP-Server-Tiny …/moar-profiler-json-to-callgrind :43:	my ($node) = @_;
tokuhirom/p6-HTTP-Server-Tiny …/Tiny.pm6 :134:	my ($header_len, $env) = parse-http-request($!buf);
tokuhirom/p6-HTTP-Server-Tiny …/Tiny.pm6 :272:	my ($status, $headers, $body) = sub {
tokuhirom/p6-HTTP-Server-Tiny …/08-long-req.t :36:	my ($headers, $body) = $buf.split(/$CRLF$CRLF/, 2);
tokuhirom/p6-Protocol-WebSocket …/Cookie.pm6 :44:	my ($k,$v) = ($pair.key, $pair.value);
tokuhirom/p6-Test-Base …/Base.pm6 :15:	my ($only, ) = grep { $_<ONLY>:exists }, @blocks;
tony-o/perl6-bench …/Bench.pm6 :41:	my ($r, $n) = @$t;
tony-o/perl6-bench …/Bench.pm6 :44:	my ($wc,$usr,$sys,$cpu);
tony-o/perl6-bench …/Bench.pm6 :73:	my ($t0, $t1, $td);
tony-o/perl6-bench …/Bench.pm6 :85:	my ($wn, $wc, $wd);
tony-o/perl6-bench …/Bench.pm6 :100:	my (Int $n, $tc);
tony-o/perl6-bench …/Bench.pm6 :125:	my ($ntotal, $rtotal) = 0;
tony-o/perl6-bench …/Bench.pm6 :151:	my ($t, $forn);
tony-o/perl6-bench …/Bench.pm6 :203:	my ($row, $skip, $f, $rate);
tony-o/perl6-db-orm-quicky …/Model.pm6 :137:	my ($type, $cflag, $eflag);
tony-o/perl6-digest-fnv …/00-basic.t :11:	my ($tstr, $ccnt, $fnv032, $fnv064, $fnv132, $fnv1a32, $fnv164, $fnv1a64);
tony-o/perl6-flow …/Cursor.pm6 :3:	my ($rows, $cols) = <lines cols>.map: { (run 'tput', $_, :out).out.slurp(:close).Int };
tony-o/perl6-green …/green :41:	my ($i, @remove) = 0, ;
tony-o/perl6-green …/Green.pm6 :5:	my ($p0, $i,$i2) = 1, 0, 0;
tony-o/perl6-green …/Green.pm6 :7:	my ($pass,$fail) = '[P]', '[F]';
tony-o/perl6-green …/Green.pm6 :84:	my ($err, $index) = 1, 1;
tony-o/perl6-green …/01-time.t :9:	my ($t0, $t1);
tony-o/perl6-hiker …/Hiker.pm6 :79:	my ($f, $module) = $_.kv;
tony-o/perl6-http-server-async-plugins-router-simple …/Simple.pm6 :9:	my ($promise, $result);
tony-o/perl6-http-server-threaded …/Threaded.pm6 :55:	my ($stop, $buf);
tony-o/perl6-http-server-threaded …/Threaded.pm6 :58:	my ($res, $req);
tony-o/perl6-http-server-threaded …/Threaded.pm6 :59:	my (%headers, $method, $resource, $version);
tony-o/perl6-libyaml …/LibYAML.pm6 :138:	my ($k, $v) = (@*KEYS.pop<value>, @*KEYS.pop<value>);
tony-o/perl6-overwatch …/overwatch.pm6 :27:	my ($prom);
tony-o/perl6-template-protone …/Protone.pm6 :16:	my (Int $from, Int $to, Str $code);
tony-o/perl6-xoo …/Searchable.pm6 :13:	my (%option, %filter);
tony-o/perl6-xoo …/Searchable.pm6 :133:	my (@*params, $sql);
tony-o/perl6-xoo …/Searchable.pm6 :177:	my ($key, $val) = $col.kv;
tony-o/perl6-xoo …/Searchable.pm6 :212:	my ($eq, $val);
tony-o/perl6-xoo …/Searchable.pm6 :13:	my (%option, %filter);
tony-o/perl6-xoo …/Searchable.pm6 :133:	my (@*params, $sql);
tony-o/perl6-xoo …/Searchable.pm6 :177:	my ($key, $val) = $col.kv;
tony-o/perl6-xoo …/Searchable.pm6 :212:	my ($eq, $val);
tony-o/perl6-xoo …/Searchable.pm6 :13:	my (%option, %filter);
tony-o/perl6-xoo …/Searchable.pm6 :133:	my (@*params, $sql);
tony-o/perl6-xoo …/Searchable.pm6 :177:	my ($key, $val) = $col.kv;
tony-o/perl6-xoo …/Searchable.pm6 :212:	my ($eq, $val);
tony-o/perl6-xoo …/Row.pm6 :23:	my ($key, $spec) = $col.kv;
tony-o/perl6-xoo …/Row.pm6 :38:	my ($key, $spec) = $rel.kv;
tony-o/perl6-xoo …/Row.pm6 :86:	my ($key, $value) = $_.kv;
tony-o/perl6-xoo …/Searchable.pm6 :13:	my (%option, %filter);
tony-o/perl6-xoo …/Searchable.pm6 :133:	my (@*params, $sql);
tony-o/perl6-xoo …/Searchable.pm6 :177:	my ($key, $val) = $col.kv;
tony-o/perl6-xoo …/Searchable.pm6 :212:	my ($eq, $val);
tony-o/perl6-xoo …/03-sqlite.t :24:	my ($sth, @raw, $scratch);
tony-o/perl6-xoo …/04-relations.t :25:	my ($sth, $scratch);
tony-o/perl6-xoo …/05-model-methods.t :24:	my ($sth, $scratch);
tony-o/perl6-xoo …/06-compound-keys.t :24:	my ($sth, $scratch);
tony-o/perl6-xoo …/07-yaml-models.t :31:	my ($sth, $scratch);
ufobat/HTTP-Server-Ogre …/FrameParser.pm6 :26:	my ($type, $flags, $sid);
ufobat/HTTP-Server-Ogre …/FrameParser.pm6 :107:	my ($dependency, $weight, $headers, $exclusive);
ufobat/HTTP-Server-Ogre …/FrameParser.pm6 :159:	my ($promised-sid, $headers);
ufobat/HTTP-Server-Ogre …/FrameParser.pm6 :175:	my ($last-sid, $error-code, $debug);
ufobat/HTTP-Server-Ogre …/RequestParser.pm6 :26:	my ($breakable, $break) = (True, $curr-sid);
ufobat/p6-XML-XPath …/Node.pm6 :28:	my ($uri, $node-name) = namespace-infos($r);
ufobat/p6-XML-XPath …/NodeTest.pm6 :38:	my ($ns, $name) = $.value.split(/':'/);
ufobat/p6-XML-XPath …/NodeTest.pm6 :40:	my ($attr-ns, $attr-name) = $key.split(/':'/);
ufobat/p6-XML-XPath …/NodeTest.pm6 :176:	my ($uri, $node-name) = namespace-infos($node);
ufobat/p6-XML-XPath …/NodeTest.pm6 :182:	my ($node-ns, $node-name) = $node.name.split(/':'/);
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/p6-time-crontab …/Set.pm6 :9:	my ($start, $stop);
ugexe/zef …/CLI.pm6 :57:	my (:@test-pass, :@test-fail) := @tested.classify: {.test-results.grep(*.so) ?? <test-pass> !! <test-fail> }
ugexe/zef …/CLI.pm6 :76:	my (:@pass, :@fail) := @built.classify: {.?build-results.grep(*.so).elems ?? <pass> !! <fail> }
ugexe/zef …/CLI.pm6 :117:	my (:@paths, :@uris, :@identities) := @wants.classify: -> $wanted {
ugexe/zef …/CLI.pm6 :136:	my (:@wanted-paths, :@skip-paths) := @paths\
ugexe/zef …/CLI.pm6 :147:	my (:@wanted-uris, :@skip-uris) := @uri-candidates-to-check\
ugexe/zef …/CLI.pm6 :157:	my (:@wanted-identities, :@skip-identities) := @identities\
ugexe/zef …/CLI.pm6 :179:	my (:@local, :@remote) := @candidates.classify: {.dist ~~ Zef::Distribution::Local ?? <local> !! <remote>}
ugexe/zef …/CLI.pm6 :303:	my (:@upgradable, :@current, :@unknown) := @requested.classify: -> $candi {
ugexe/zef …/CLI.pm6 :339:	my (:@upgraded, :@failed) := @sorted-candidates.map(*.uri).classify: -> $uri {
ugexe/zef …/CLI.pm6 :361:	my (:@paths, :@uris, :@identities) := @wants.classify: -> $wanted {
ugexe/zef …/CLI.pm6 :574:	my (:@remote, :@local) := @candidates.classify: {.dist !~~ Zef::Distribution::Local ?? <remote> !! <local>}
ugexe/zef …/CLI.pm6 :779:	my (:@log-level, :@filtered-args) := @_.classify: {
vendethiel/Sprockets.pl …/Locator.pm6 :19:	my ($f, $fext, $filters) = split-filename($_.Str.substr($dir.chars));
viklund/november …/generate-password.pl :13:	my ($username, $passphrase) = @*ARGS;
viklund/november …/Tags.pm :129:	my ($min, $max) = 0, 0;
viklund/november …/Grammar.pm :18:	# my($scheme, $authority, $path, $query, $fragment) =
viklund/november …/InputOutput.pm :13:	my ($input, $expected, $description);
viklund/november …/November.pm :48:	my ($self, $cgi) = @_;
viklund/november …/November.pm :69:	my ($cgi) = @_;
viklund/november …/November.pm :82:	my ($string) = @_;
viklund/november …/November.pm :91:	my ($page) = @_;
viklund/november …/November.pm :93:	if ( my ($path) = $page =~ m[ ^ $PUGS_PREFIX \b (.*) $ ]x ) {
viklund/november …/November.pm :102:	my ($name) = @_;
viklund/november …/November.pm :110:	my ($page, $title) = @_;
viklund/november …/November.pm :119:	my ($url, $title) = @_;
viklund/november …/November.pm :126:	my ($page, $revision) = @_;
viklund/november …/November.pm :132:	my ($page, $old_revision, $new_revision) = @_;
viklund/november …/November.pm :139:	my ($text) = @_;
viklund/november …/November.pm :206:	my ($page) = @_;
viklund/november …/November.pm :215:	my ($page, $page_history_ref) = @_;
viklund/november …/November.pm :223:	my ($page) = @_;
viklund/november …/November.pm :230:	my ($page) = @_;
viklund/november …/November.pm :239:	my ($page, $revision) = @_;
viklund/november …/November.pm :250:	my ($page, $article_text, $tags, $author) = @_;
viklund/november …/November.pm :274:	my ($recent_changes_ref) = @_;
viklund/november …/November.pm :282:	my ($modification_id) = @_;
viklund/november …/November.pm :289:	my ($modification_id, $modification_ref) = @_;
viklund/november …/November.pm :298:	my ($page, $tags) = @_;
viklund/november …/November.pm :331:	my ($page, $tags) = @_;
viklund/november …/November.pm :369:	my ($page, $tags) = @_;
viklund/november …/November.pm :413:	my ($modification_id, $page, $contents, $author) = @_;
viklund/november …/November.pm :422:	my ($cgi, $page) = @_;
viklund/november …/November.pm :437:	my ($cgi) = @_;
viklund/november …/November.pm :445:	my ($cgi) = @_;
viklund/november …/November.pm :461:	if ( my ($path) = $page =~ m[ ^ $PUGS_PREFIX \b (.*) $ ]x ) {
viklund/november …/November.pm :526:	my ($cgi) = @_;
viklund/november …/November.pm :537:	my ($cgi) = @_;
viklund/november …/November.pm :593:	my ($cgi) = @_;
viklund/november …/November.pm :608:	my ($cgi) = @_;
viklund/november …/November.pm :639:	sub ins { my ($type, $change) = @_; $type eq '+' ? $change : '' };
viklund/november …/November.pm :640:	sub del { my ($type, $change) = @_; $type eq '-' ? $change : '' };
viklund/november …/November.pm :643:	my ($cgi) = @_;
viklund/november …/November.pm :683:	my ($cgi) = @_;
viklund/november …/November.pm :736:	my ($cgi) = @_;
viklund/november …/November.pm :768:	my ($cgi) = @_;
viklund/november …/November.pm :792:	my ($cgi) = @_;
viklund/november …/November.pm :852:	my ($count, $min, $max) = @_;
viklund/november …/tag_count_normalize.t :15:	my ($tags, $expected) = @$_;
viklund/november …/tags_parser.t :26:	my ($in, $result) = @$_;
viklund/november …/norm.t :18:	my ($min, $max) = @in.minmax.bounds;
whity/perl6-hematite …/Router.pm6 :122:	my ($method) = $mdw.can('CALL-ME');
wollmers/P6-LCS-All …/All.pm :11:	my ($i,$j);
wollmers/P6-LCS-BV …/BV.pm :6:	my ($amin, $amax, $bmin, $bmax) = (0, $a.elems - 1, 0, $b.elems - 1);
wollmers/P6-LCS-BV …/BV.pm :22:	my ($y,$u);
zag/plosurin …/plosurin :7:	my ($name, $val ) = @*ARGS.splice(0,2);
zag/plosurin …/Plosurin.pm :125:	my ($key,$val) = $/[0..1];
zag/plosurin …/Plosurin.pm :185:	my ($line, $column ) = line-and-column($/);
zengargoyle/p6-Algorithm-Trie-libdatrie …/02-trie.t :55:	my ($fn, $fh) = tempfile :unlink;
zoffixznet/perl6-App-Nopaste …/nopaste :18:	my ( $paste, $desc ) = App::Nopaste.new.fetch($url);
zoffixznet/perl6-App-Nopaste …/Nopaste.pm6 :23:	my ( $files, $desc ) = Pastebin::Gist.new.fetch($url);
zoffixznet/perl6-App-Nopaste …/Nopaste.pm6 :29:	my ( $paste, $desc ) = Pastebin::Shadowcat.new.fetch($url);
zoffixznet/perl6-Color …/Conversion.pm6 :12:	my ( $h, $Δ, $c_max ) = calc-hue( $r, $g, $b );
zoffixznet/perl6-Color …/Conversion.pm6 :21:	my ( $h, $Δ, $c_max, $c_min ) = calc-hue( $r, $g, $b );
zoffixznet/perl6-Color …/Conversion.pm6 :79:	my ($r, $g, $b);
zoffixznet/perl6-Color …/Manipulation.pm6 :51:	my ($h, $s, $l) = rgb2hsl( $r, $g, $b );
zoffixznet/perl6-Color …/Utilities.pm6 :28:	my ( $r, $g, $b, $a ) = map { :16($_) }, $hex.comb(/../);
zoffixznet/perl6-IRC-Client …/Client.pm6 :339:	my ($where, $text) = @args;
zoffixznet/perl6-IRC-Client …/Client.pm6 :408:	my ($pref, $cmd) = 0, 1;
zoffixznet/perl6-IRC-Client …/01-basic.pl :9:	my ($Port) = @ARGV;
zoffixznet/perl6-IRC-Client …/01-basic.pl :29:	my ($kernel, $heap) = @_[KERNEL, HEAP];
zoffixznet/perl6-IRC-Client …/01-basic.pl :41:	my ($event, @args) = @_[ARG0 .. $#_];
zoffixznet/perl6-Pastebin-Gist …/README.pod :116:	my ( $files, $desc )
zoffixznet/perl6-Pastebin-Gist …/README.pod :119:	my ( $files, $desc ) = $p.fetch('5590bc07b8d5bd8fd98d');
zoffixznet/perl6-Pastebin-Gist …/paste.pl6 :19:	my ( $files, $summary ) = $p.fetch( $paste_url );
zoffixznet/perl6-Pastebin-Gist …/01-paste.t :25:	my ($files, $desc) = $p.fetch: $paste_url;
zoffixznet/perl6-Pastebin-Shadowcat …/README.pod :19:	my ( $content, $summary ) = $p.fetch('http://fpaste.scsys.co.uk/471157');
zoffixznet/perl6-Pastebin-Shadowcat …/README.pod :47:	my ( $content, $summary ) = $p.fetch('http://fpaste.scsys.co.uk/471157');
zoffixznet/perl6-Pastebin-Shadowcat …/README.pod :49:	my ( $content, $summary ) = $p.fetch('471157');
zoffixznet/perl6-Pastebin-Shadowcat …/paste.pl6 :11:	my ( $content, $summary ) = $p.fetch($paste_url);
zoffixznet/perl6-Pastebin-Shadowcat …/01-paste.t :12:	my ( $content, $summary ) = $p.fetch( $paste_url );
zoffixznet/perl6-Test-When …/01-env-vars.t :160:	my ($out, $err) = $proc.out.slurp(:close), $proc.err.slurp: :close;
zoffixznet/perl6-Twitter …/UA.pm6 :17:	my ($signature, $nonce, $timestamp) = self!sign: $method, $url, $body;
zoffixznet/q …/Actions.pm6 :126:	my ($text, @classes) = $<node-text>.made;
zostay/DateTime-DST …/DST.pm6 :12:	my ($posix, $leap-sec) = $time.to-posix;
zostay/HTTP-Supply …/Body.pm6 :157:	my ($name, $value) = $line.split(": ");
zostay/HTTP-Supply …/Request.pm6 :236:	my ($method, $uri, $http-version, @error) = $line.split(' ', 3);
zostay/HTTP-Supply …/Request.pm6 :384:	my ($name, $value) = $line.split(": ");
zostay/HTTP-Supply …/Response.pm6 :200:	my ($http-version, $status-code, $status-message) = $line.split(' ', 3);
zostay/HTTP-Supply …/Response.pm6 :340:	my ($name, $value) = $line.split(": ");
zostay/P6W …/100-continue.p6w :35:	my ($s, @h, Supply() $b) = process-input();
zostay/P6W …/psgi-middleware.p6w :7:	my ($s, @h, $p) = $r.result;
zostay/P6W …/te-chunked-mw.p6w :30:	my ($s, List() $h, Supply() $payload) = $p.result;
zostay/p6-Getopt-ForClass …/ForClass.pm6 :5:	my (@pos, %names);
zostay/p6-Getopt-ForClass …/ForClass.pm6 :156:	my (@common-pos, @common-named);
zostay/p6-Path-Router …/Router.pm6 :74:	my (Str $path, Path::Router $router) = $pair.kv;
zostay/p6-Path-Router …/Router.pm6 :246:	my ($route, $path) = @($possible);
zostay/p6-Path-Router …/Router.pm6 :13:	my ($passed, $reason);
zostay/p6-Path-Router …/014_test_path_router.t :127:	my ($output, $error) = init-io;