«raku» 태그된 질문

토큰 이름을 직접 사용하여 토큰 서명을 쉽게 사용할 수 있습니다. my token t ( $x ) { $x }; 'axb' ~~ / 'a' <t: 'x'> 'b' /; # match 'axb' ~~ / 'a' <t( 'x' )> 'b' /; # match 그러나 토큰이 변수에 저장되어있을 때 이것을 수행하는 방법을 찾지 못했습니다. …

10 raku 

Raku가 다차원 배열을 잘못 조작하는 이유가 궁금합니다. Python, C # 및 Raku에서 2 차원 행렬을 초기화하는 빠른 테스트를 수행했으며 경과 시간이 놀랍게도 나중에 높았습니다. 라쿠 my @grid[4000;4000] = [[0 xx 4000] xx 4000]; # Elapsed time 42 seconds !! 파이썬 table= [ [ 0 for i in range(4000) ] for …

10 performance  raku 

지속 시간 동안 왜 쥐를 Real로 손으로 강제해야하지만 Int는 그렇지 않습니까? Perl 6.d를 구현하는 MoarVM 버전 2020.01.1을 기반으로하는 Rakudo 버전 2020.01입니다. OSX에서. say $v.WHAT; #(Int) $v = Duration.new( $v ); say $v; #20 my $w = 20.0; say $w.WHAT; #(Rat) $w = Duration.new( $w.Real ); say $w; #20 my $x …

9 raku 

규칙적으로 일정한 상용구를 사용한다고 가정 해 봅시다. 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; … } } 차라리 말할 수 …

9 raku 

별도의 스레드에서 오류를 전파하는 가장 좋은 방법은 무엇입니까 (예 : 시작 블록, Proc :: Async 또는 이들을 포함하는 하위). try / CATCH 블록에서 새 스레드를 분리하는 코드를 래핑하는 것만으로는 작동하지 않으며 await를 사용하면 하위 루틴의 반환 값에 따라 작동합니다 (즉, 하위 반환 자체는 await 접근 방식에서는 작동하지 않음).

9 raku 

나는 예를 들어 얻을 수있는 것과 같이 (1..5) Z (20..24)해시로 만들고 싶은 두 가지 요소 목록을 가지고 있습니다 (이 예에서는 당신이 얻는 것 {1 => 20, 2 => 21, 3 => 22, 4 => 23, 5 =>24}입니다. 너무 우아하지는 않지만 Raku가 관용적 인 방법을 가지고 있다고 확신합니다. my @a = …

9 raku 

이 교대 두 가지 유형의 라쿠의 정규식에 다음 |과 ||. 차이점은 무엇입니까? say 'foobar' ~~ / foo || foobar / # ｢foo｣ say 'foobar' ~~ / foo | foobar / # ｢foobar｣

9 raku  nqp 

perl 5에서는 wc -loneliner를 사용하여 에뮬레이션 할 수 있습니다 . perl -lnE 'END {say $.}' test.txt Raku에서이 기능을 구현하는 방법 이것을 구현하려고하면 : raku -e 'say "test.txt".IO.open.lines.elems' 속도가 느리고 많은 메모리를 사용합니다. 재생산을위한 정보 : $ wget http://eforexcel.com/wp/wp-content/uploads/2017/07/1500000%20Sales%20Records.zip $ unzip "1500000 Sales Records.zip" $ mv "1500000 Sales Records.csv" part.txt $ …

9 perl  raku 

Raku Documentation과 여러 서적 및 자습서 및 여러 Stackoverflow 게시물을 검색하여 목록 / 배열에서 항목을 깨끗하게 삭제하는 방법, 즉 삭제 된 요소 대신 (Any) 를 사용 하지 않는 방법을 배웠 습니다. my @s = <3 18 4 8 92 14 30>; my $item = 8; my $index = @s.first($item, :k); …

9 raku 

일정 Promise시간 동안 일정 을 유지할 수 있음을 알고 있습니다. my $promise = Promise.in($seconds); 하지만 어떻게 부서 지도록 예약 할 수 있습니까? 특히, "시간 초과"로 인해 약속을 지키는 데 일정 시간이 걸리거나 실패 할 것이라는 약속을 생각하고 있습니다. 나는 다른 Promise처럼 이것을 할 수 있습니다 : my $promise = Promise.new; …

9 promise  raku 

CATCH 블록이 실패를 처리 할 수 ​​있다는 것을 알고 있습니다. 다음 예에서는 'AdHoc'실패 (다른 서브)를 작성하고 CATCH 블록 (예 : my-sub)의 예외를 처리합니다. sub my-sub { try { CATCH { when X::AdHoc { say 'AdHoc Exception handled here'; .resume } default {say 'Other Exception'; .resume} } my $b = other-sub(); …

9 exception  try-catch  raku 

die유용한 오류 메시지에 대한 몇 가지 제약 조건과 문장을 추가하는 몇 가지 하위 집합을 정의하고 싶습니다 . 해당 하위 집합을 사용하는 모듈 맨 위에 정의하고 싶지 않고 대신 FQN (정규화 된 이름)을 사용하여 다른 모듈에 배치하고 싶습니다. 예를 들어 unit module Long::Module::Subsets; subset PosInt where ($_ ~~ Int || "The …

9 module  subset  raku 

이 스레드에 제공된 코드는 더 이상 작동하지 않습니다. Perl 6에서 객체를 어떻게 복원 할 수 있습니까? 작년 에이 코드를 작성했는데 그때 작동했습니다. 이제는 그렇지 않습니다. class Person { ; } class Woman is Person { ; } my $tom = Person.new; my $lisa = Woman.new; say $tom.^name; # -> Person …

9 raku 

수식 을 계산하여 e 상수 ( AKA Euler 's Number )를 계산 하려고합니다. 한 번에 계승과 나눗셈을 계산하기 위해 다음과 같이 썼습니다. my @e = 1, { state $a=1; 1 / ($_ * $a++) } ... *; say reduce * + * , @e[^10]; 그러나 그것은 효과가 없었습니다. 올바르게하는 방법?

9 code-generation  lazy-evaluation  raku  eulers-number 

기본적으로 Raku의 "die"는 "die"가있는 줄 번호를보고합니다. 호출 컨텍스트의 줄 번호를 원한다면 perl 5의 "carp"는 무엇입니까?

9 exception  raku  die  carp