एक सबरूटीन विधि वाक्य रचना के माध्यम से कहा जा सकता है कि परिभाषित

Question

sqrt समारोह वाक्य रचना के माध्यम से कहा जा सकता है:

> sqrt 16 
4 

यह भी विधि वाक्य रचना के माध्यम से कहा जा सकता है:

> 16.sqrt 
4 

वहाँ बनाने के लिए एक रास्ता है प्रयोक्ता परिभाषित subroutines विधि वाक्यविन्यास के माध्यम से invokable?

उदाहरण के लिए, sq को परिभाषित करते हैं:

> sub sq(Int $n) { $n*$n } 
sub sq (Int $n) { #`(Sub|64042864) ... } 
> sq 4 
16 

वहाँ यह एक विधि के रूप प्रतिदेय बनाने के लिए एक तरीका है? अर्थात।

> 4.sq 

Answer 1

वहाँ उपयोगकर्ता परिभाषित सबरूटीन्स विधि वाक्य रचना के माध्यम से invokable बनाने के लिए एक तरीका है?

हाँ, बस के रूप में .& सिंटैक्स का उपयोग करें,:

625.&sqrt.say 
# 25 

invocant पहले तर्क के रूप में पारित हो जाता है:

sub sq { $^a² }; say 4.&sq 
4.&sq.say 
# 16 

केवल पकड़ आप है अगर unspace उपयोग करने के लिए आप इन्हें कई पंक्तियों पर विधि श्रृंखला को तोड़ना चाहते हैं:

4.&sq\ 
.&sq.say; 

Answer 2

आप Int बढ़ाने के लिए बंदर-लेखन का उपयोग कर सकते हैं। ऑप्टिमाइज़र को जमानत के लिए उम्मीद करें, आपकी इच्छा/स्तन कम करने के लिए और दुनिया सामान्य रूप से समाप्त हो। बंदर-टाइपिंग बुराई है। इसका उपयोग तब तक न करें जब तक आपको करना न पड़े।

use MONKEY-TYPING; 
augment class Int { method sq(Int:D $i:){ $i * $i } }; 
my Int $i = 4; 
say $i.sq; 

आप ऑब्जेक्ट में भूमिका निभा सकते हैं। ध्यान दें कि वस्तु वस्तु है, कक्षा Int और न ही कंटेनर $i।

my $i = 4 but role :: { method sq(Int:D $i:){ $i * $i } }; 
say $i.sq; 

आप एक नि: शुल्क चल विधि बना सकते हैं और .& विधि कॉल ऑपरेटर का उपयोग कर सकते हैं।

my method sq(Int:D $i:){ $i * $i }; 
my $i = 4; 
say $i.&sq; 

संपादित करें:

तुम सच में मान्यताओं को तोड़ने के लिए आप यहां तक ​​कि निजी विशेषताओं का उपयोग कर सकते हैं।

class Foo { has $!bar = 'meow'; }; 
use MONKEY-TYPING; 
augment class Foo { method baz { say $!bar } }; 
Foo.new.baz 
# OUTPUT«meow␤»