सबफंक्शंस के पर्ल हैश

Question

मैं एक हैश को उप-फ़ंक्शंस के संदर्भ में रखना चाहता हूं जहां मैं उन कार्यों को उपयोगकर्ता परिभाषित चर पर निर्भर कर सकता हूं, मैं कोशिश करूँगा और जो मैं करने की कोशिश कर रहा हूं उसका सरलीकृत उदाहरण दूंगा।

my %colors = (
    vim => setup_vim(), 
    emacs => setup_emacs(), 
) 

$colors{$editor}(arg1, arg2, arg3) 

जहां setup_vim() और setup_emacs() उप कार्यों मेरी फाइल और $editor में बाद में परिभाषित किया जाएगा एक उपयोगकर्ता निर्धारित चर (यानी vim या Emacs) है। क्या यह संभव है? मैं इसे काम नहीं कर सकता, या विषय पर अच्छी जानकारी पा सकता हूं। धन्यवाद।

(ध्यान दें मैं अभी लागू किया एक काम स्विच के रूप में है, लेकिन मुझे लगता है कि जैसे एक हैश ऊपर अपने मौजूदा कोड करने के लिए नए प्रविष्टियों को जोड़ने के लिए यह आसान होगा)

Answer 1

यहाँ वाक्य रचना है।

my %colors = (
    vim => \&setup_vim, 
    emacs => \&setup_emacs, 
); 

$colors{$editor}(@args) 

ध्यान दें कि आप वास्तव में सीधे

my %colors = (
    vim => sub {...}, 
    emacs => sub {...}, 
); 

साथ और अगर आप बंद से परिचित हैं कार्यों बना सकते हैं, पर्ल चर lexically घोषित किया गया है, जो आप के साथ कर सकते के लिए पूर्ण बंद का समर्थन करता है मेरी ।

Answer 2

आपको उस सबराउटिन का संदर्भ देना होगा जिसे आप हैश में कॉल करना चाहते हैं।

sub myFunc { 
    print join(' - ', @_); 
} 

my %hash = (key => \&myFunc); 
$hash{key}->(1,2,3); 

साथ \ & myFunc आप समारोह में संदर्भ जो अंक मिलता है:

यहाँ एक उदाहरण है। महत्वपूर्ण() दूर छोड़ना महत्वपूर्ण है। ओहराइज आप फ़ंक्शन के रिटर्न वैल्यू के संदर्भ से गुज़रेंगे।

संदर्भ द्वारा फ़ंक्शन को कॉल करते समय आपको -> ऑपरेटर के साथ इसे खराब करना होगा।