Perguntas com a marcação «raku»

Estou tentando ver a maneira de jogar um mapa no contexto do coletor. Neste código class Sunk { has $.titanic; method sink { say "Sinking $!titanic"; } } Sunk.new( :titanic($_) ) for 1..3; (1..3).map: { Sunk.new( :titanic($_) ) }; O forloop efetivamente afunda todo o criado, o mapnão. Alguma idéia …

8 raku 

Versão Rakudo 2020.01 Eu estava escrevendo um código descartável e não me incomodei em implementar uma classe, apenas usei um Hash como trabalho. Eu encontrei um comportamento surpreendente com listas. class Q1 {} class R1 { has Str $.some-str is required; has @.some-list is required; } my $r1 = R1.new( …

8 raku 

No loop for simples a seguir, criamos uma matriz (@a) incrementando uma variável sem tipo ($ n): my @a = do for 1..3 { state $n; $n.^name, $n++; } say @a; O resultado é "tipo de" esperado: [(Any 0) (Int 1) (Int 2)] E digo "mais ou menos" porque esperava …

8 variables  initialization  raku 

Eu gostaria de fazer uma substituição de string em um forbloco usando uma captura nomeada. Eu esperava obter os números 1,2,3 como saída. Mas é Nilpara a primeira execução e, em seguida, 1 e 2 para a 2ª e a 3ª execução. Como uso .substcorretamente a construção do loop? Eu …

8 raku  string-substitution 

Como faço para dividir uma sequência de caracteres bem / idioma em uma lista de posições? O que eu tenho: .say for split-at( "0019ABX26002", (3, 4, 8) ); sub split-at( $s, @positions ) { my $done = 0; gather { for @positions -> $p { take $s.substr($done, $p - $done …

8 raku 

No exemplo a seguir, tento criar um Capture dinamicamente "convertendo" uma matriz (@a) em um Capture. Considere o código: sub f (|c){ say ''; say ' List : ' ~ do {c.list.gist if c.list.elems > 0}; say ' Hash : ' ~ do {c.hash.gist if c.hash.elems > 0}; say ''; …

8 dynamic  capture  raku 

Ao ler e tentar assinatura de correspondência inteligente, encontro algo estranho. Executando os seguintes pares de assinaturas de smartmaching: my @sigs = :($a, $b), :($a, @b), :($a, %b); my @signatures_to_check = :($, $), :($, @), :($, %); my $c = 0; for @sigs -> $sig { for @signatures_to_check -> $s …

8 signature  raku  smartmatch 

Eu usei o módulo CPAN Perl Data :: Printer (DP) com Perl. Isso funciona muito bem. Agora eu quero usá-lo no código Raku. Quando eu uso o :from<Perl5>recurso para importá-lo e, em seguida, executar o código usando-o, a anotação (tied to Perl6::Hash)é anexada à exibição de hashes. 1 Como o …

8 perl  import  module  tags  raku 

Eu tenho uma classe com atributos. Quero verificar se alguns, mas nem todos, estão definidos. Assim: class A { has $.a is rw; has $.b is rw; has $.c is rw; has $.d is rw; method delete { ... } } my A $x .= new(:a<hi>, :d<good>); ## later $x.b …

8 class  raku  introspection 

De acordo com a lista de verificação 6.d (versão atual) , eles podem. Contudo, class Foo { has num $.numillo; submethod BUILD( :$numillo = 3.5 ) {} }; my $foo = Foo.new; say $foo.raku; # OUTPUT: «Foo.new(numillo => 0e0)␤» O atributo atttr parece não ser vinculável ou, pelo menos, não …

8 syntax  raku 

Eu quero clonar uma matriz multidimensional @a em uma matriz @b. Eu procedi da maneira mais intuitiva e criei o seguinte: my @a = [0, 0, 0], [0, 0, 0], [0, 0, 0]; my @b = @a.clone; @a[0][1] = 1; @b[1][0] = 1; say '@a : ' ~ @a.gist; say …

8 arrays  clone  raku 

Usando o seguinte código: use v6d; # sub circumfix:<α ω>( @a ) { # @a[0] >= @a[1] & @a[0] <= @a[2]; # }; sub circumfix:<α ω>( $a, $b, $c ) { $a >= $b & $a <= $c; }; if (α <5 0 10> ω) { say 'Truthy'; } else …

8 operator-overloading  raku 

Parece uma pergunta simples, mas Perl6 / Raku não está se comportando como eu esperava. Estou tentando criar uma referência a uma matriz dentro de um hash, mas não estou obtendo o comportamento esperado. No Perl5, a resposta envolveria o acesso à matriz por referência, mas não vejo sintaxe equivalente …

8 arrays  json  hash  raku 

O resultado é o mesmo em curry, say map * **2 , 1, 3, 5, 7, 9; (1 9 25 49 81) say map *² , 1, 3, 5, 7, 9; (1 9 25 49 81) Por outro lado, os comportamentos são diferentes através do meta-operador cruzado, say 1, 3, …

8 raku 

Estou carregando módulos dinamicamente no meu aplicativo raku rest / API. Quero evitar que o servidor seja reiniciado toda vez que fiz alguma modificação nos meus módulos. Existe uma maneira de recarregar os módulos raku toda vez que você ligar? try require ::('Foo');

8 raku