キャプチャグループで変数regexを作成すると、全体の一致はOKですが、キャプチャグループはNilです。 my $str = 'nn12abc34efg';
my $atom =/\d ** 2 /;
my $rgx =/($atom) \w+ ($atom) /;
$str ~~/$rgx/;
say ~$/; # 12abc34
say $0; # Nil
say $1; # N
私は属性特性を作成しようとしています。このユースケースは、オブジェクトからドキュメントへのマッピングの文脈で、クラスのいくつかの属性を "crudable"としてマークすることです。 role crud {
has Bool $.crud is default(True);
}
multi trait_mod:<is>(Attribute $a, crud, $arg) {
生の演算子を定義して渡すことによって、Schemeと同様の機能を実現しようとしています。 sub x($a) { $a * 2; }
sub y($m, $n) { $m($n); }
say y(&x, 3); # gives you 6
say y(+, 3) # this is error
があります:スキームでは、あなたは (define x +) (x 1 2)
と、この操
は、ケースのクラスは次のようになります。 val alice = Person("Alice", 25, Address("1 Scala Lane", "Chicago", "USA"))
val bob = Person("Bob", 29, Address("2 Java Ave.", "Miami", "USA"))
val charlie = Person("Charlie",
Unixソケットを使用してmpvと通信したいと思いますが、Perl 6はこれを行うための高水準インターフェースを提供していません。だから私はそれのための少しのモジュールを書くことができ、深く掘り下げ始め、IO::Socket::INETの実装を見つけて、NQPのオペレーションnqp::socketとnqp::connectについて学んだと思った。 しかし、私はNQP operations li