Als «raku» getaggte Fragen

Bei Fragen zur Programmiersprache Raku (früher bekannt als Perl 6).

1
Stoppen der Raku-Grammatik bei EOS (End of String)
Beim Schreiben eines Übersetzers einer Musiksprache in eine andere (ABC an Alda) als Ausrede für das Erlernen der Raku-DSL-Fähigkeit fiel mir auf, dass es anscheinend keine Möglichkeit gibt, a zu beenden .parse! Hier ist mein verkürzter Demo-Code: #!/home/hsmyers/rakudo741/bin/perl6 use v6d; # use Grammar::Debugger; use Grammar::Tracer; my $test-n01 = q:to/EOS/; a …
9 parsing  grammar  raku 



1
Perl Regex vs. Raku Regex, Unterschiede im Motor?
Ich versuche, eine Regex-basierte Lösung für das Rucksackproblem von Perl auf Raku umzustellen. Details zu Perlmonks Die Perl-Lösung erstellt diesen regulären Ausdruck: (?<P>(?:vvvvvvvvvv)?) (?<B>(?:vv)?) (?<Y>(?:vvvv)?) (?<G>(?:vv)?) (?<R>(?:v)?) 0 (?= (?(?{ $1 })wwww|) (?(?{ $2 })w|) (?(?{ $3 })wwwwwwwwwwww|) (?(?{ $4 })ww|) (?(?{ $5 })w|) ) was gegen abgeglichen wird vvvvvvvvvvvvvvvvvvv0wwwwwwwwwwwwwww. …
9 regex  raku 


2
Gibt es eine Möglichkeit, ein Symbol sicher neu zu deklarieren?
Ich experimentiere oft in der REPL und ich werde etwas sagen wie: subset Bar of Int where * %% 57; Dann spiele ich Barein bisschen mit der Überprüfung der -ness für Dinge herum . Alles ist glücklich, bis mir klar wird, dass ich die Definition von ändern möchte Bar. Wenn …
9 raku 

3
Drucken mathematischer Reihen in Raku
Nehmen Sie zum Beispiel die hier dargestellte aufeinanderfolgende Sequenz als Array: my @seq = my $a=0, {++$a} ... *; for @seq[^10].kv {state $f=0; ($^k < 4 or $^k > 7) ?? say "a$^k = " ~ $^v !! (say "..." if $f ne 1; $f=1) }; Drucke: a0 = 0 …
9 sequence  raku 

2
Installieren Sie Raku (Perl 6) in Ubuntu zusammen mit Perl 5.26
Ich bin gespannt auf Raku (Perl 6) und seine Syntax. Ich habe Perl 5 bereits auf meinem Ubuntu-Computer installiert. vinod@ubuntu-s-1vcpu-1gb-nyc1-01:~$ perl -v This is perl 5, version 26, subversion 1 (v5.26.1) built for x86_64-linux-gnu-thread-multi (with 67 registered patches, see perl -V for more detail) Copyright 1987-2017, Larry Wall Perl may …


2
Zerstöre eine Liste von Paaren
Erwägen .say for (1,2,2).rotor(2=>-1).map( -> ($a, $b) { $a - $b }) das funktioniert wie erwartet. Jedoch, .say for (1,2,2).pairs.rotor(2=>-1).map( -> ($a, $b) { $a.value - $b.value }) wirft Too few positionals passed to '<anon>'; expected 2 arguments but got 0 in sub-signature Ist das ein Fehler oder fehlt mir …
8 raku  rakudo 

2
Signaturbeschränkung in Rollen in Raku
Vielleicht fehlt mir etwas, aber ich würde gerne wissen, ob es einen guten Grund gibt, warum dieser Code kompiliert werden sollte role L { method do-l (Int, Int --> Int ) { ... } } class A does L { method do-l (Int $a, Real $b --> Str) { .Str …
8 raku 

2
Rationale Zahlen in Raku
Ich benutze Raku für einige Berechnungen, weil es schöne numerische Typen hat. Ich habe jedoch ein Problem mit der Verwendung von '.raku'. say (1/6+1/6).raku #<1/3> Wir erhalten dies. Jedoch, say (1/10+1/10).raku #0.2 Ist es ein Fehler? Ich habe <1/5> erwartet. Was geschieht?
8 raku 

2
Wie können Sie ein Modul für eine Rollengruppe schreiben?
Eine Funktion von Rollen sind Rollengruppen, mit denen Sie mehrere Rollen mit demselben Namen deklarieren können, die unterschiedliche Parameter akzeptieren, ähnlich wie bei mehreren Routinen: role Foo[Int:D] { method is-int(::?CLASS:_: --> True) { } method is-str(::?CLASS:_: --> False) { } } role Foo[Str:D] { method is-int(::?CLASS:_: --> False) { } …

2
Unerwarteter Fehler mit: existiert in Raku
Beim Versuch, Programmcode zu debuggen, stieß ich auf Folgendes: (base) hsmyers@BigIron:~$ rlwrap -A raku To exit type 'exit' or '^D' > my regex N { <[A..G]> }; regex N { <[A..G]> } > my %h = A => 1, B => 2; {A => 1, B => 2} > 'B' …
8 hash  key  exists  raku 

1
Raku: Gibt es eine SUPER schnelle Möglichkeit, ein Array in einen String umzuwandeln, ohne dass die Leerzeichen die Elemente trennen?
Ich muss Tausende von binären Byte-Strings, die jeweils etwa ein Megabyte lang sind, in ASC-Strings konvertieren. Dies ist, was ich getan habe und scheint zu langsam: sub fileToCorrectUTF8Str ($fileName) { # binary file my $finalString = ""; my $fileBuf = slurp($fileName, :bin); for @$fileBuf { $finalString = $finalString ~ $_.chr; …
8 arrays  string  binary  raku 

Durch die Nutzung unserer Website bestätigen Sie, dass Sie unsere Cookie-Richtlinie und Datenschutzrichtlinie gelesen und verstanden haben.
Licensed under cc by-sa 3.0 with attribution required.