«raku» etiketlenmiş sorular

Doğrudan belirteç adını kullanarak belirteç imzalarını kolayca kullanabilirim: my token t ( $x ) { $x }; 'axb' ~~ / 'a' <t: 'x'> 'b' /; # match 'axb' ~~ / 'a' <t( 'x' )> 'b' /; # match Ancak jeton değişkente depolandığında bunu yapmanın bir yolunu bulamadım: my $t = …

10 raku 

Raku'nun neden çok boyutlu dizileri manipüle etmekte bu kadar kötü performans gösterdiğini merak ediyorum. Python, C # ve Raku'da 2 boyutlu bir matris başlatan hızlı bir test yaptım ve geçen süre daha sonra için şaşırtıcı derecede yüksek. Raku için my @grid[4000;4000] = [[0 xx 4000] xx 4000]; # Elapsed time …

10 performance  raku 

Ben sırt çantası sorunu Perl raku için regex tabanlı bir çözüm dönüştürmek çalışıyorum. Perlmonks ile İlgili Ayrıntılar Perl çözümü bu normal ifadeyi oluşturur: (?<P>(?:vvvvvvvvvv)?) (?<B>(?:vv)?) (?<Y>(?:vvvv)?) (?<G>(?:vv)?) (?<R>(?:v)?) 0 (?= (?(?{ $1 })wwww|) (?(?{ $2 })w|) (?(?{ $3 })wwwwwwwwwwww|) (?(?{ $4 })ww|) (?(?{ $5 })w|) ) eşleşir vvvvvvvvvvvvvvvvvvv0wwwwwwwwwwwwwww. Bundan sonra …

10 regex  raku 

Bir süre için, neden bir Rat'ı bir Real'e elle zorlamam gerekiyor, ama Int değil? Bu, Perl 6.d uygulayan MoarVM 2020.01.1 sürümü üzerine inşa edilmiş Rakudo 2020.01 sürümüdür. OSX'te. say $v.WHAT; #(Int) $v = Duration.new( $v ); say $v; #20 my $w = 20.0; say $w.WHAT; #(Rat) $w = Duration.new( $w.Real …

9 raku 

Diyelim ki belirli bir kazan plakasını oldukça düzenli kullanıyorum: class Foo { method abc($a: $b, $c, +@d) is pure { use Slang::Bar; … } method xyz($a: $b, $c, +@d) is pure { use Slang::Bar; … } method blarg($a: $b, $c, +@d) is pure { use Slang::Bar; … } } Sadece …

9 raku 

Hataları ayrı bir iş parçacığından yaymanın en iyi yolu nedir (örn. Start bloğu, Proc :: Async veya bunları içeren alt). Yeni bir iş parçacığını döndüren kodu basitçe bir try / CATCH bloğuna sarmak işe yaramaz ve beklemenin kullanılması sadece alt rutinin dönüş değerine bağlı olarak çalışır (yani bir alt geri …

9 raku 

Ben (1..5) Z (20..24)bir karma haline (bu örnekte, ne elde etmek istiyorum.) Örneğin, ne olsun gibi iki öğeli listelerin bir listesi var {1 => 20, 2 => 21, 3 => 22, 4 => 23, 5 =>24}, ama "elle" yapabilirim, ama bu değil Çok zarif ve eminim Raku bunu yapmanın deyimsel …

9 raku 

Raku'nun normal ifadesinde iki tür alternatif vardır: |ve ||. Fark ne ? say 'foobar' ~~ / foo || foobar / # ｢foo｣ say 'foobar' ~~ / foo | foobar / # ｢foobar｣

9 raku  nqp 

Perl 5'te, wc -loneliner kullanarak taklit edebilirsiniz : perl -lnE 'END {say $.}' test.txt Raku üzerinde bu işlev nasıl uygulanır Bunu uygulamaya çalışırsanız: raku -e 'say "test.txt".IO.open.lines.elems' yavaş olduğu ortaya çıkıyor ve çok fazla bellek kullanıyor Çoğaltma bilgileri: $ wget http://eforexcel.com/wp/wp-content/uploads/2017/07/1500000%20Sales%20Records.zip $ unzip "1500000 Sales Records.zip" $ mv "1500000 Sales …

9 perl  raku 

Bir liste / diziden bir öğeyi silmek öğrenmek için Raku Belgeleri ve çeşitli kitaplar ve öğreticiler ve çok sayıda Stackoverflow Mesajları arama yapmış temiz kalmadan yani (Herhangi) silinen elemanın yerine my @s = <3 18 4 8 92 14 30>; my $item = 8; my $index = @s.first($item, :k); @s[$index]:delete; …

9 raku 

PromiseA'nın belirli bir sürede saklanması için zamanlama yapabileceğimi biliyorum my $promise = Promise.in($seconds); ama kırılmasını nasıl planlayabilirim? Özellikle, "zaman aşımı" yapacak bir vaat düşünüyorum, böylece tutulması için belirli bir süre kadar ya da başarısız olacaktır. Bunu başka biriyle yapabilirim Promise, şöyle: my $promise = Promise.new; ... Promise.in($seconds).then: { $promise.break }; …

9 promise  raku 

Bir Arızanın bir CATCH bloğu tarafından ele alınabileceğini biliyoruz. Aşağıdaki örnekte 'AdHoc' Hatası (diğer altta) oluşturuyoruz ve İstisna'yı bir CATCH bloğunda (alt-altta) ele alıyoruz sub my-sub { try { CATCH { when X::AdHoc { say 'AdHoc Exception handled here'; .resume } default {say 'Other Exception'; .resume} } my $b = …

9 exception  try-catch  raku 

Ben de bazı kısıtlamalar ve diebazı yararlı hata mesajları için bazı ifadeler ekliyorum birkaç alt kümeleri tanımlamak istiyorum . Onları bu alt kümeleri kullanan modülün üstünde tanımlamak istemiyorum ve bunun yerine tam olarak nitelendirilmiş adlarını (FQN) kullanarak bunları yaparken başka bir modüle yerleştirmek istiyorum. Mesela bende unit module Long::Module::Subsets; subset …

9 module  subset  raku 

Bu iş parçacığında verilen kod artık çalışmıyor: Perl 6'da bir nesneyi nasıl korusun? Bu kod parçasını geçen yıl yazdım ve o zaman işe yaradı. Şimdi değil: class Person { ; } class Woman is Person { ; } my $tom = Person.new; my $lisa = Woman.new; say $tom.^name; # -> …

9 raku 

Ben hesaplamak çalışıyorum e sabiti ( AKA Euler sayısı formülü hesaplayarak) Faktöriyel ve bölünmeyi tek bir çekimde hesaplamak için şunu yazdım: my @e = 1, { state $a=1; 1 / ($_ * $a++) } ... *; say reduce * + * , @e[^10]; Ama işe yaramadı. Nasıl doğru yapılır?

9 code-generation  lazy-evaluation  raku  eulers-number