Используйте тег perl6 для всех вопросов, связанных с языком программирования Perl 6 (также известным как "Raku").
2 ответа

Как вставить разделители между столбцами?

У меня есть столбцы в @columns: my @columns =('column1', 'column2', 'column3'); и у меня есть разделители в @separators: my @separators = (',', '|'); Я хочу вставить разделители между столбцами, один за другим: column1,column2|column мое решение: (@…
26 июл '18 в 15:38
1 ответ

Как выйти из обещания из обещания?

Как выйти из обещания из обещания? Документы perl6 не предоставляют простой способ. Например: my $x = start { loop { # loop forever until "quit" is seen my $y = prompt("Say something: "); if $y ~~ / quit / { # I want to exit the promise from here; #…
21 авг '17 в 05:21
2 ответа

Сообщение об ошибке Perl 6: неправильно сформированный UTF-8 в блоке <unit>

Я пытаюсь прочитать скачанный html-файл my $file = "sn.html"; my $in_fh = open $file, :r; my $text = $in_fh.slurp; и я получаю следующее сообщение об ошибке: Malformed UTF-8 in block &lt;unit&gt; at prog.p6 line 10 Как этого избежать и получить дост…
16 мар '18 в 11:48
2 ответа

Почему panda не может установить мой модуль, когда все тесты проходят локально?

Я являюсь автором Pod-Perl5 модуля Perl 6, который анализирует модуль Perl 5. До выпуска Perl 6.c этот модуль устанавливался нормально с panda install Pod::Perl5, Теперь это терпит неудачу с обширным списком ошибок (выдержка ниже, полный вывод здесь…
06 фев '16 в 20:45
1 ответ

Самый простой способ разбить строку на равные части в Perl6

Есть ли в Perl6 элегантный способ разбить строку на равные части, как, например, это реализовано в PowerShell? В PowerShell: 'abcdefghijklmnopqrstuvwxyz' -split '(.{8})' Результат: abcdefgh ijklmnop qrstuvwx yz Есть много глупых split в официальной …
06 апр '18 в 16:14
1 ответ

Наследование личных атрибутов в Perl 6

Я ничего не могу найти в документации, но кажется, что в подклассе нет доступа к закрытым переменным его суперкласса. Я прав? class A { has $!a; } class B is A { has $.b; method set_a($x) { $!a = $x; } } my $var = B.new(); $var.set_a(5); say $var.a;…
25 апр '18 в 21:10
5 ответов

Как в операциях множеств Perl 6 сравниваются элементы?

Бег под морем (2016.10) Рассмотрим этот код, который создает набор и проверяет членство: my $num_set = set( &lt; 1 2 3 4 &gt; ); say "set: ", $num_set.perl; say "4 is in set: ", 4 ∈ $num_set; say "IntStr 4 is in set: ", IntStr.new(4, "Four") ∈ $num_…
26 ноя '16 в 04:32
1 ответ

Как передать произвольный список аргументов в командной строке в Perl 6?

Я знаю, как передать одиночные и именованные аргументы в командной строке скрипту Perl 6, но как передать произвольный список аргументов? Например, script.pl6 fileA.txt fileB.txt а затем запустить его с script.pl6 fileC.txt fileD.txt .. fileZ.txt
05 янв '16 в 07:02
1 ответ

Rakudo Perl 6: очистить экран при использовании модуля Readline

Вот моя тестовая программа: use Readline; shell 'clear'; my $r = Readline.new; loop { my $a = $r.readline("&gt; "); {say ''; last} if not defined $a; $r.add-history( $a ); say $a; } После того, как я ввожу любую строку, она выходит со следующим сооб…
03 янв '18 в 09:54
2 ответа

Привязка скаляра к переменной без сигилла (Perl 6)

Позвольте мне начать с того, что я понимаю, что то, о чем я спрашиваю в названии, является сомнительной практикой (как объяснено здесь), но мое непонимание касается синтаксиса. Когда я впервые попытался связать скаляр с символом без знака, я сделал …
24 июн '18 в 10:18
1 ответ

Perl6 REPL поведение при печати

Когда я выполняю следующий оператор в Perl6 REPL: my $var = 1, 2, 3; это печатает: (1 2 3) Это кажется мне любопытным, потому что $var на самом деле назначается одно целое число (т.е. $var.WHAT возвращается (Int)), а не List из Ints. Я так понимаю, …
2 ответа

Есть ли в Perl 6 эквивалент байтового массива?

Давайте возьмем пример Java byte[] data, В сигнатуре метода для Perl я могу сделать method myMethod($data) но это форма динамической типизации, которая полезна. Тем не менее, я хочу манипулировать массивом байтов - так есть ли предпочтительный спосо…
12 июл '18 в 23:39
1 ответ

Почему я не могу вызвать метод методов объекта ClassHOW в Perl 6?

Я могу позвонить ^methods на объекте и перечислите имена методов, которые я могу вызвать: my $object = 'Camelia'; my @object_methods = $object.^methods; @object_methods.map( { .gist } ).sort.join("\n").say; ^methods возвращает список, в котором я хр…
05 мар '16 в 19:48
1 ответ

Как найти правильные минимальные / максимальные значения списка в Perl 6

Новичок в Perl6, пытаюсь выяснить, что я здесь делаю не так. Проблема заключается в простой контрольной сумме, которая принимает разницу между максимальным и минимальным значениями для каждой строки в CSV Максимальное и минимальное значения, которые…
04 дек '17 в 04:54
2 ответа

Как я могу скомпилировать файл Perl6 для EXE

Я играю с версией Perl6, которая основана на MoarVM на Windows. Я создал некоторый файл perl6 и хочу скомпилировать его в exe. Я попробовал следующее: perl6 --target=MAST r.pl&gt;r Теперь я хочу скомпилировать r в исполняемый файл Я нашел эту ссылку…
27 ноя '14 в 21:01
1 ответ

Несколько версий Perl6 с использованием rakudobrew

Можно ли управлять несколькими версиями Perl 6, используя rakudobrew? Я старался: $ rakudobrew build moar но это просто переписало мою предыдущую версию, что я не собирался делать. Моя предыдущая версия была 2017.04.3 когда я сейчас наберу $ perl6 -…
02 авг '17 в 14:53
2 ответа

Как определить пользовательский тип массива ссылок Ints в Perl 6?

Как определить пользовательский тип Array-Reference of Ints в Perl 6? Я попробовал это, но это не работает: subset Array_of_Int of Array where *.all ~~ Int; my $n = My::Class.new( option =&gt; &lt; 22 3 4 5 &gt; ); # Type check failed in assignment …
05 янв '16 в 13:15
1 ответ

Как я могу использовать "карту" внутри цикла "для" в Perl 6?

Я пытаюсь использовать map внутри for цикл, но этот код не работает. Этот код должен напечатать 1 а также 2 три раза. Но приведенный ниже код не производит вывода. Это будет работать только частично, если вы раскомментируете exit линия. Есть идеи по…
10 янв '16 в 16:15
2 ответа

Объединение регулярных выражений с использованием цикла в Perl 6

Здесь я делаю regex вручную из Regex элементы массива. my Regex @reg = / foo /, / bar /, / baz /, / pun / ; my $r0 = @reg[0]; my $r1 = @reg[1]; my Regex $r = / 0 $r0 | 1 $r1 /; "0foo_1barz" ~~ m:g/&lt;$r&gt;/; say $/; # (「0foo」 「1bar」) Как это сдела…
13 ноя '17 в 15:19
1 ответ

Почему я не могу вызвать мета-методы в Routine::WrapHandle?

Это постоянный вопрос из моего предыдущего. Почему метод развёртывания в Perl 6 является рутинным методом?, но в основном не связано. wrap задокументировано, что метод возвращает "экземпляр частного класса с именем WrapHandle. Кроме того, что он стр…
05 май '17 в 19:44