Запитання з тегом «raku»

FAQ: Як у Raku видалити деякі символи з рядка, виходячи з їх індексу? Скажіть, я хочу видалити індекси 1 - 3 та 8 xxx("0123456789", (1..3, 8).flat); # 045679

15 raku 

Нещодавно я витратив чималий час налагодження сценарію, і коли нарешті знайшов проблему, це було через код, який виглядав приблизно так: class Foo { has $.bar; method () { # do stuff $!.bar; } } Виявилося, проблема була в тому $!.bar, що мало бути $!barабо $.bar. Я це розумію. Але чому …

14 raku 

Намагаючись створити повідомлення JSON для API, я опинився, що намагаюся зробити щось, на що я вважав, що це буде просто. Мені потрібно було створити повідомлення на зразок наступного: { "list": [ { "foo": 1, "bar": 2 } ] } Однак моя перша спроба не вийшла: say to-json { foo => …

14 data-structures  raku 

Іноді я почну писати ланцюжок викликів методів на REPL 6 Perl, наприклад: ".".IO.dir.grep(...).map(...). ... і тоді я розумію, що те, що я хочу зробити з остаточним списком, - це надрукувати кожен елемент у своєму рядку. Я б очікував, що послідовності матимуть щось на зразок eachметоду, щоб я міг закінчити ланцюг …

14 raku 

У мене є деякі дані ТСВ ID Name Email 1 test test@email.com 321 stan stan@nowhere.net Я хотів би розібрати це у списку хешів @entities[0]<Name> eq "test"; @entities[1]<Email> eq "stan@nowhere.net"; У мене виникають проблеми з використанням метахарактера нового рядка для відмежування рядка заголовка від рядків значення. Моє визначення граматики: use v6; …

13 csv  grammar  raku 

У Perl, використовуючи Moo, ви можете реалізувати aroundsubs, які будуть обговорювати інші методи класу. 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"; }; Як така поведінка може бути реалізована в …

13 oop  raku 

Як виразити подвійну змінну послідовності подвійного підсумовування в Perl 6? Для прикладу подвійної змінної послідовності подвійного підсумовування див Він повинен бути виражений таким, який є, тобто без математичного зведення подвійного підсумовування в єдине підсумовування. Дякую.

13 math  raku 

#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 …

12 raku 

my @s=<1 2 3 2 3 4>; say reduce {$^a < $^b}, @s; say [<] @s; # -------- # True # False Моє запитання двояке: По-перше, чому метаоператор скорочення обробляє <оператора інакше? Схоже, метаопція зменшення оцінюється за допомогою змінної, яка при першій зміні від істинного до помилкового зберігає цю зміну, …

12 raku  reduction 

У мене є труднощі зрозуміти, коли і чому Scalarпісля натискання впливає значення, яке утримує контейнер, що висувається . Я спробую проілюструвати проблему, яку я зіткнувся у більш складному контексті на двох стилізованих прикладах. * Приклад 1 * У першому прикладі скаляр $iвисувається на масив @bяк частина a List. Після натискання …

12 for-loop  raku  indirection 

Як вказує заголовок, яка різниця між $/та $¢? Здається, вони завжди мають однакове значення: my $text = "Hello world"; $text ~~ /(\w+) { say $/.raku } (\w+)/; $text ~~ /(\w+) { say $¢.raku } (\w+)/; Обидва призводять до відповідності об'єктів з однаковими значеннями. Яка логіка використання одного над іншим?

11 regex  raku 

Я пишу пакет креслень з деякими частинами, і у мене є оператори та типи даних, що розкидані через групу. Однак я не хочу, щоб користувачі щоразу додавали відповідні модулі, оскільки це було б дуже безладно, наприклад, я мав би Pointклас, Monoidроль та Styleклас у різних шляхах, як це unit module …

11 haskell  raku 

Тут я вивчаю свій шлях навколо Раку (не Perl 6), дуже приємно все навколо. Але я дуже сумую за магією <>Perl 5, де можна просто: my $x = <>; print $x; while(<>) { print join(':', split); } (читайте наступний рядок введення на $x, переведіть цикл на решту; вхід - з …

11 migration  raku 

Я хотів би запустити додаток perl6 / raku Cro як службу за веб-сервером інтерфейсу. Просто запущений cro runне оброблятиме перезавантаження після segfaults та перезавантажень. Раніше з perl5 я використовував FastCGI - проте Cro::HTTP::Server«s Cro::HTTP::Server.new().start()ідіома не виглядає сумісним з FastCGI :: тубільця while $fcgi.accept() {}. Наприклад , service.p6Породжена cro stubдійсно є …

11 raku  cro 

Хеш з набраними клавішами ... use v6; class Foo {} my Hash[Foo, Foo] $MAP; my $f1 = Foo.new; my $f2 = Foo.new; $MAP{$f1} = $f2; видає помилку: Заклик методу "ASSIGN-KEY" повинен бути об'єктним екземпляром типу "Hash [Foo, Foo]", а не об'єктом типу типу "Hash [Foo, Foo]". Ви забули ".new"? Я …

10 raku