Pertanyaan yang diberi tag «raku»

Saya dapat dengan mudah menggunakan tanda tangan token dengan menggunakan nama token secara langsung: my token t ( $x ) { $x }; 'axb' ~~ / 'a' <t: 'x'> 'b' /; # match 'axb' ~~ / 'a' <t( 'x' )> 'b' /; # match Namun saya belum menemukan cara untuk …

10 raku 

Saya ingin tahu mengapa Raku melakukan manipulasi array multidimensi yang sangat buruk. Saya telah membuat tes cepat menginisialisasi matriks 2 dimensi dalam Python, C # dan Raku dan waktu yang berlalu sangat tinggi untuk nanti. Untuk Raku my @grid[4000;4000] = [[0 xx 4000] xx 4000]; # Elapsed time 42 seconds …

10 performance  raku 

Untuk Durasi, mengapa saya perlu memaksa Rat ke Real dengan tangan, tetapi bukan Int? Ini adalah Rakudo versi 2020.01 yang dibangun di atas MoarVM versi 2020.01.1 yang mengimplementasikan Perl 6.d. Di OSX. say $v.WHAT; #(Int) $v = Duration.new( $v ); say $v; #20 my $w = 20.0; say $w.WHAT; #(Rat) …

9 raku 

Katakanlah saya menggunakan satu set boilerplate tertentu secara teratur: 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; … } } Saya …

9 raku 

Apa cara terbaik untuk menyebarkan kesalahan dari utas terpisah (mis. Blok start, Proc :: Async, atau sub yang mengandung ini). Cukup dengan membungkus kode yang memutar utas baru dalam blok coba / CATCH tidak berfungsi, dan menggunakan menunggu hanya berfungsi tergantung pada nilai balik dari sub rutin (mis. Diri yang …

9 raku 

Saya memiliki daftar daftar dua elemen, seperti apa yang akan Anda dapatkan misalnya dengan (1..5) Z (20..24), yang ingin saya buat menjadi hash (dalam contoh ini, apa yang Anda dapatkan {1 => 20, 2 => 21, 3 => 22, 4 => 23, 5 =>24}. Saya bisa melakukannya "dengan tangan", tetapi …

9 raku 

Ada dua jenis pergantian di regex Raku: the |dan ||. Apa bedanya ? say 'foobar' ~~ / foo || foobar / # ｢foo｣ say 'foobar' ~~ / foo | foobar / # ｢foobar｣

9 raku  nqp 

Dalam perl 5, Anda dapat meniru wc -lmenggunakan oneliner: perl -lnE 'END {say $.}' test.txt Bagaimana menerapkan fungsi ini di Raku Jika Anda mencoba menerapkan ini: raku -e 'say "test.txt".IO.open.lines.elems' ternyata lambat dan menggunakan banyak memori Informasi untuk direproduksi: $ wget http://eforexcel.com/wp/wp-content/uploads/2017/07/1500000%20Sales%20Records.zip $ unzip "1500000 Sales Records.zip" $ mv "1500000 …

9 perl  raku 

Saya telah mencari di Dokumentasi Raku dan beberapa buku & tutorial dan beberapa posting Stackoverflow untuk mempelajari cara menghapus item dari daftar / array dengan bersih yaitu tanpa memiliki (Apa saja) di tempat elemen yang dihapus my @s = <3 18 4 8 92 14 30>; my $item = 8; …

9 raku 

Saya tahu saya bisa menjadwalkan Promiseuntuk disimpan dalam jumlah waktu tertentu my $promise = Promise.in($seconds); tetapi bagaimana saya bisa menjadwalkannya untuk dilanggar? Secara khusus, saya memikirkan janji yang akan "habis", sehingga masih ada waktu untuk dijaga atau kalau tidak akan gagal. Saya bisa melakukan ini dengan yang lain Promise, seperti: …

9 promise  raku 

Kita tahu bahwa Kegagalan dapat ditangani oleh blok CATCH. Pada contoh berikut ini, kami membuat Kegagalan 'AdHoc' (di sub-sub lainnya) dan kami menangani Pengecualian dalam blok CATCH (di sub-saya) sub my-sub { try { CATCH { when X::AdHoc { say 'AdHoc Exception handled here'; .resume } default {say 'Other Exception'; …

9 exception  try-catch  raku 

Saya ingin mendefinisikan beberapa himpunan bagian yang saya juga menambahkan beberapa kendala dan beberapa diepernyataan untuk beberapa pesan kesalahan yang berguna. Saya tidak ingin mendefinisikan mereka di bagian atas modul yang menggunakan himpunan bagian itu dan sebaliknya ingin menempatkan mereka di modul lain sambil juga menghilangkan menggunakan nama yang sepenuhnya …

9 module  subset  raku 

Kode yang diberikan di utas ini tidak berfungsi lagi: Bagaimana saya bisa rebless objek di Perl 6? Saya menulis kode ini tahun lalu, dan itu berhasil saat itu. Sekarang tidak: class Person { ; } class Woman is Person { ; } my $tom = Person.new; my $lisa = Woman.new; …

9 raku 

Saya mencoba menghitung konstanta e ( AKA Euler's Number ) dengan menghitung rumus Untuk menghitung faktorial dan pembagian dalam satu kesempatan, saya menulis ini: my @e = 1, { state $a=1; 1 / ($_ * $a++) } ... *; say reduce * + * , @e[^10]; Tapi itu tidak berhasil. …

9 code-generation  lazy-evaluation  raku  eulers-number 

Secara default, "mati" Raku melaporkan nomor baris tempat "mati" berada, bagaimana jika Anda ingin nomor baris dari konteks panggilan, ala "ikan mas" dengan perl 5?

9 exception  raku  die  carp