perl6

    5

    1답변

    Perl 6에서 런타임시 함수/서브 루틴의 이름을 본체에서 가져올 수 있습니까? 예를 들어 , sub foo { say "My name is: " ~ <WHAT-API-HERE??> ; } ... foo(); 위의 코드를 인쇄해야합니다 : 나는 MOP, FAQ 및 Functions 같은 장소에서 봤는데 My name is: foo .

    3

    1답변

    일부 이모티콘이 결합되었습니다. 예를 들어 U + 1f441() U + 200d (ZWJ) U + 1f5e8()가 합쳐져 ​​(I am a witness)가됩니다. MoarVM 2016.07에 Rakudo 2016년 7월 1일 두 제자가 말한다 : 나는 > "\x[1f441]\x[fe0f]\x[200d]\x[1f5e8]\x[fe0f]".chars 2

    7

    1답변

    .chars에 대한 나의 이해는 "the number of characters in the string in graphemes"을 반환한다는 것입니다. .ords에 대한 나의 이해는 "a list of codepoint numbers, one for the base character of each grapheme in the string"을 반환한다는 것입

    8

    2답변

    순진한 Perl 6 프로그램은 유니 코드와 관련하여 왕복 안전하지 않습니다. $ perl -CO -E 'say "e\x{301}"' | perl6 -ne '.say' | perl -CI -ne 'printf "U+%04x\n", ord for split //' U+00e9 U+000a 나는이 문제에 대한 아무것도 볼 수없고, 나는 그것이 매우 충격

    3

    2답변

    perl6에 대한 일부 perl5 코드의 준비를 시작하고 싶습니다. 특히, 나는 변수가 무엇이되어야 하는지를 선언하는 아이디어를 좋아한다. perl6은 Bool, Int, Array, Hash, Num, Complex, Pair 및 Str을 정의합니다. 그래서 본질적으로 C 프리 프로세서 인 #define Int /**/을 지금 사용하고 싶습니다. 그것은

    2

    2답변

    BagHash을 사용하여 정규 표현식의 일치 개수를 계산하고 이상한 결과를 얻으려고합니다. my $fh = open "versions.txt"; my $versions = BagHash.new(); while (defined my $line = $fh.get) { my $last = ''; if $line ~~ /(\d+)\.?(\d

    2

    2답변

    나는 perl6과 그 변화를 perl5보다 이해하려고 노력 중이다. 나는 perl 6이 컴파일 된 언어라는 것을 알게되었지만 나는 어떻게 얻지 못하고 있는가? 중간 코드 (직접 실행 파일 또는 jvm 바이트 코드)를 생성하지 않습니다? 동일한 작업을 수행 할 수있는 옵션이 없습니다. 그것을하는 방법? 현재 코드를 직접 실행할 수 있습니다. 내가 모듈과 프로

    3

    1답변

    모듈 작업을 통해 Perl6에 익숙해 지려고했지만 올바른 워크 플로우가 무엇인지 알 수 없습니다. 지금은 rakudobrew입니다. HTTP::Client에 SSL/TLS 지원을 추가하고 싶습니다. rakudobrew는 어디에 라이브러리를 저장합니까? 수정 된 버전을 사용하려면 어떻게해야합니까? Perl6을 시작하는 데 시간과 인내심을 가져 주셔서 감사합니

    8

    1답변

    이것이 Rakudo의 버그일지도 모릅니다.하지만 오늘 Perl 6로 시작 했으므로 실수를하고있는 것 같습니다. 이 간단한 프로그램에서 하위 내부에 형식화 된 배열을 선언하면 Perl 6 컴파일러를 화나게 만듭니다. 배열에서 형식 주석을 제거하면 컴파일러 오류가 제거됩니다. 여기 간단한 소수 찾는 프로그램이다 : [[email protected] p6test

    3

    2답변

    약속으로 실행되는 3 대의 에코 서버를 코드화하려고하는데 어떤 약속이 울리고 있는지 알고 싶습니다. 그렇게 할 수있는 방법이 있습니까? no strict; for 0 .. 2 -> $index { @result[$index] = start { $myID = $index; say "======> $myID\n";