Untuk pertanyaan yang berkaitan dengan bahasa pemrograman Raku (sebelumnya dikenal sebagai Perl 6).
FAQ: Di Raku, bagaimana Anda menghapus beberapa karakter dari string, berdasarkan indeks mereka? Katakanlah saya ingin menghapus indeks 1 hingga 3 dan 8 xxx("0123456789", (1..3, 8).flat); #
Terkadang saya akan mulai menulis serangkaian panggilan metode di Perl 6 REPL, seperti: ".".IO.dir.grep(...).map(...). ... dan kemudian saya menyadari bahwa apa yang ingin saya lakukan dengan daftar terakhir adalah mencetak setiap elemen pada barisnya sendiri. Saya berharap urutan memiliki...
Saat mencoba membuat pesan JSON untuk API, saya menemukan diri saya berjuang untuk melakukan sesuatu yang saya pikir akan sederhana. Saya perlu membuat pesan seperti berikut: { "list": [ { "foo": 1, "bar": 2 } ] } Namun, upaya pertama saya tidak berhasil: say to-json { foo => [ { a => 1,...
Saya menghabiskan banyak waktu debugging skrip baru-baru ini, dan ketika saya akhirnya menemukan masalah itu karena kode yang terlihat seperti ini: class Foo { has $.bar; method () { # do stuff $!.bar; } } Ternyata masalahnya adalah dengan itu $!.bar, yang seharusnya $!baratau $.bar. Saya...
Bagaimana cara mengekspresikan urutan penjumlahan ganda variabel ganda dalam Perl 6? Untuk contoh urutan penjumlahan ganda variabel ganda lihat ini Itu harus dinyatakan apa adanya, yaitu tanpa secara matematis mengurangi penjumlahan ganda menjadi penjumlahan tunggal. Terima
Di Perl, menggunakan Moo, Anda bisa menerapkan aroundsubs, yang akan membungkus metode lain di kelas. around INSERT => sub { my $orig = shift; my $self = shift; print "Before the original sub\n"; my $rv = $orig->($self, @_); print "After the original sub\n"; }; Bagaimana perilaku ini...
Saya punya beberapa data TSV ID Name Email 1 test [email protected] 321 stan [email protected] Saya ingin menguraikan ini ke dalam daftar hash @entities[0]<Name> eq "test"; @entities[1]<Email> eq "[email protected]"; Saya mengalami masalah dengan menggunakan metacharacter baris baru...
Saya mengalami kesulitan memahami kapan dan mengapa nilai yang dipegang oleh Scalarwadah terdorong dipengaruhi setelah dorongan. Saya akan mencoba mengilustrasikan masalah yang saya hadapi dalam konteks yang lebih rumit dalam dua contoh bergaya. * Contoh 1 * Dalam contoh pertama, skalar $ididorong...
#Private attribute example class C { has $!w; #private attribute multi method w { $!w } #getter method multi method w ( $_ ) { #setter method warn “Don’t go changing my w!”; #some side action $!w = $_ } } my $c = C.new $c.w( 42 ) say $c.w #prints 42 $c.w: 43 say $c.w #prints 43 #but...
my @s=<1 2 3 2 3 4>; say reduce {$^a < $^b}, @s; say [<] @s; # -------- # True # False Pertanyaan saya ada dua: Pertama, mengapa metaoperator reduksi memproses <operator secara berbeda? Sepertinya reduksi metaop diperkirakan menggunakan variabel yang, pada perubahan pertama dari...
Saya menulis paket gambar dengan beberapa bagian, dan saya memiliki operator dan tipe data yang tersebar di seluruh penjuru. Namun saya tidak ingin para pengguna menambahkan modul yang sesuai setiap waktu, karena akan sangat berantakan, misalnya saya memiliki Pointkelas, Monoidperan dan Stylekelas...
Saya ingin menjalankan aplikasi perl6 / raku Cro sebagai layanan di belakang server web frontend. Menjalankan saja cro runtidak akan menangani restart setelah segfault & reboot. Sebelumnya dengan perl5 saya sudah FastCGI digunakan - namun Cro::HTTP::Server's
Di sini belajar jalan saya di Raku (neé Perl 6), sangat bagus di sekitar. Tapi saya sangat merindukan keajaiban <>dari Perl 5, di mana Anda bisa: my $x = <>; print $x; while(<>) { print join(':', split); } (baca baris input berikutnya ke dalam $x, loop di atas sisanya; input...
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...
Hash dengan kunci yang diketik ... use v6; class Foo {} my Hash[Foo, Foo] $MAP; my $f1 = Foo.new; my $f2 = Foo.new; $MAP{$f1} = $f2; menghasilkan kesalahan: Invocant dari metode 'ASSIGN-KEY' harus berupa instance objek dari tipe 'Hash [Foo, Foo]', bukan objek tipe tipe 'Hash [Foo, Foo]'....
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 melakukan ini, ketika token disimpan...
Saya mencoba untuk mengubah solusi berbasis regex untuk masalah ransel dari Perl ke raku. Detail tentang Perlmonks Solusi Perl menciptakan regex ini: (?<P>(?:vvvvvvvvvv)?) (?<B>(?:vv)?) (?<Y>(?:vvvv)?) (?<G>(?:vv)?) (?<R>(?:v)?) 0 (?= (?(?{ $1 })wwww|) (?(?{ $2...
Saya menghapus posting karena saya tidak berkonsultasi tentang penyensoran /
Saya ingin menemukan urutan yang berdekatan dari elemen yang sama (misalnya panjang 2) dalam daftar my @s = <1 1 0 2 0 2 1 2 2 2 4 4 3 3>; say grep {$^a eq $^b}, @s; # ==> ((1 1) (2 2) (4 4) (3 3)) Kode ini terlihat ok tetapi ketika satu lagi 2 ditambahkan setelah urutan 2 2 2atau...
Seri matematika, ambil contoh urutan berurutan yang diwakili di sini sebagai 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) }; Cetakan: a0 = 0 a1 = 1 a2 = 2 ... a8 = 8 a9 = 9 Pertanyaan...