Preguntas etiquetadas con raku

Estoy tratando de ver la forma de lanzar un mapa en contexto de sumidero. En este código class Sunk { has $.titanic; method sink { say "Sinking $!titanic"; } } Sunk.new( :titanic($_) ) for 1..3; (1..3).map: { Sunk.new( :titanic($_) ) }; los for bucle efectivamente hunde todo lo creado, el …

8 raku 

Rakudo versión 2020.01 Estaba escribiendo un código desechable y no me molesté en implementar una clase, solo usé un Hash como trabajo. Encontré un comportamiento sorprendente con las listas. class Q1 {} class R1 { has Str $.some-str is required; has @.some-list is required; } my $r1 = R1.new( some-str …

8 raku 

En el siguiente bucle for simple, creamos una matriz (@a) incrementando una variable sin tipo ($ n): my @a = do for 1..3 { state $n; $n.^name, $n++; } say @a; El resultado es "tipo de" esperado: [(Any 0) (Int 1) (Int 2)] Y digo "tipo de" porque he esperado …

8 variables  initialization  raku 

Me gustaría hacer una sustitución de cadena en un forbloque usando una captura con nombre. Esperaba obtener los números 1,2,3 como salida. Pero es Nilpara la primera carrera, y luego 1 y 2 para la segunda y tercera carrera. ¿Cómo uso .substcorrectamente en la construcción de bucle? Veo el mismo …

8 raku  string-substitution 

¿Cómo divido agradable / idiomáticamente una cadena en una lista de posiciones? Lo que tengo: .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 ); $done = $p; } …

8 raku 

En el siguiente ejemplo, trato de crear una captura dinámicamente "convirtiendo" una matriz (@a) en una captura. Considera el 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 

Mientras leo e intento el emparejamiento inteligente de firmas, me encuentro con algo extraño. Ejecutando los siguientes pares de firmas de smartmaching: my @sigs = :($a, $b), :($a, @b), :($a, %b); my @signatures_to_check = :($, $), :($, @), :($, %); my $c = 0; for @sigs -> $sig { for …

8 signature  raku  smartmatch 

He usado el módulo CPAN Perl Data :: Printer (DP) con Perl. Funciona muy bien Ahora quiero usarlo en el código Raku. Cuando uso la :from<Perl5>función para importarlo y luego ejecuto el código que lo usa, la anotación (tied to Perl6::Hash)se agrega a la visualización de hashes. 1 Como muestra …

8 perl  import  module  tags  raku 

Tengo una clase con atributos. Quiero verificar si algunos pero no todos están definidos. Entonces: 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 acuerdo con la lista de verificación 6.d (versión actual) , pueden hacerlo . Sin embargo, class Foo { has num $.numillo; submethod BUILD( :$numillo = 3.5 ) {} }; my $foo = Foo.new; say $foo.raku; # OUTPUT: «Foo.new(numillo => 0e0)␤» El atributo no parece ser enlazable, o al menos …

8 syntax  raku 

Quiero clonar una matriz multidimensional @aen una matriz @b. He procedido de la manera más intuitiva y se me ocurrió lo siguiente: 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; …

8 arrays  clone  raku 

Usando el siguiente 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 

Esto parece una pregunta simple, pero Perl6 / Raku no se está comportando como esperaba. Estoy tratando de crear una referencia a una matriz dentro de un hash, pero no obtengo el comportamiento esperado. En Perl5, la respuesta implicaría acceder a la matriz por referencia, pero no veo una sintaxis …

8 arrays  json  hash  raku 

El resultado es el mismo bajo 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 otro lado, los comportamientos son diferentes a través del metaoperador cruzado, say 1, …

8 raku 

Estoy cargando módulos dinámicamente en mi aplicación raku rest / API. Quiero evitar que el servidor se reinicie cada vez que realice alguna modificación en mis módulos. ¿Hay alguna manera de volver a cargar los módulos raku cada vez que llame? try require ::('Foo');

8 raku