বানর :: প্যাচ :: কর্ম মোড়ানো / যোগ / প্রতিস্থাপন / প্রতিস্থাপন করুন অন্যান্য প্যাকেজ থেকে (পুনরুদ্ধারের সাথে)
এখনই ডাউনলোড করুন

বানর :: প্যাচ :: কর্ম র‌্যাঙ্কিং ও সারাংশ

বানর :: প্যাচ :: কর্ম ট্যাগ

পার্ল মডিউল প্যাচ পার্ল Subs

বানর :: প্যাচ :: কর্ম বর্ণনা

একটি সাবরুটিন / পদ্ধতি যোগ প্রতিস্থাপন / মুছে ফেলা / অন্য মোড়কে, ইত্যাদি পার্ল এটা যে কাজ করতে, উদাহরণস্বরূপ সহজ করে তোলে:: # একটি সাবরুটিন * যোগ { "উদ্দিষ্ট :: sub1 বানর-প্যাচিং রানটাইম এ একটি প্যাকেজ পরিবর্তন এর কাজ "} = সাব {...}; # অন্য উপায়, যেকোনো ফাইল প্যাকেজ উদ্দিষ্ট থেকে করা যেতে পারে; সাব sub2 {...} # * { "উদ্দিষ্ট :: sub3"} undef একটি সাবরুটিন মুছে ফেলা; বানর :: প্যাচ :: অ্যাকশন একটি পার্ল মডিউল জিনিষ এমনকি সাহায্য আপনি প্যাচ একটি স্ট্যাক প্রয়োগ দ্বারা সহজ করে তোলে যে তাদের unapply পরে নমনীয় order.SYNOPSIS ব্যবহার বানর মধ্যে :: প্যাচ :: অ্যাকশন qw (patch_package); Foo প্যাকেজের; সাব sub1 {বলুন "foo বিন্যাস এর sub1"} সাব sub2 {বলুন "foo বিন্যাস এর sub2, args =", যোগদান ( ",", @_)} সাব meth1 {আমার $ স্ব = শিফট; বলুন "foo বিন্যাস এর meth1"} প্যাকেজ বার; আমাদের @ISA = qw (foo); প্যাকেজ প্রধান; আমার $ জ; # হ্যান্ডেল বস্তুর আমার $ foo বিন্যাস = Foo- নতুন>; আমার $ বার = বার-> নতুন; # যদি সাবরুটিন $ H = patch_package ( 'ফু', 'sub1', 'প্রতিস্থাপন', সাব { "যাও qux"}) প্রতিস্থাপন; Foo বিন্যাস :: sub1 (); # "যাও qux" $ H undef বলছেন; Foo বিন্যাস :: sub1 (); # বলে "foo বিন্যাস এর sub1" # একটি সাবরুটিন $ H = patch_package ( 'ফু' 'sub3', 'অ্যাড', সাব { "যাও qux"},) যোগ; Foo বিন্যাস :: sub3 (); # "যাও qux" $ H undef বলছেন; Foo বিন্যাস :: sub3 (); # ডাইস একটি সাবরুটিন $ H = patch_package ( 'ফু', 'sub2', 'ডিলিট') মুছে ফেলার #; Foo বিন্যাস :: sub2 (); # $ H undef মারা যায়; Foo বিন্যাস :: sub2 (); # বলে "foo বিন্যাস এর sub2, args =" # একটি সাবরুটিন $ H = patch_package ( 'ফু', 'sub2', 'মোড়ানো', সাব {আমার $ CTX = শিফট মোড়কে; বলুন "মোড়কে $ CTX -> {প্যাকেজ} :: $ CTX -> {SUBNAME} "; $ CTX -> {orig} -> (@_);}); Foo বিন্যাস :: sub2 (1,2,3); # বলে "মোড়ানো ফু :: sub2" তারপরে "foo বিন্যাস এর sub2, args = 1,2,3" $ H undef; Foo বিন্যাস :: sub2 (1,2,3); # বলে "foo বিন্যাস এর sub2, args = 1,2,3" # স্ট্যাক প্যাচ (দ্রষ্টব্য: আসলে র্যান্ডম ক্রম অপ্রযোজ্য হতে পারে) আমার ($ H2, $ H3); $ H = patch_package ( 'ফু', 'sub1', 'প্রতিস্থাপন', সাব { "যাও qux"}); Foo বিন্যাস :: sub1 (); # "যাও qux" $ H2 = patch_package ( 'ফু', 'sub1', 'মুছে ফেলতে') বলে; Foo বিন্যাস :: sub1 (); # ডাইস $ H3 = patch_package ( 'ফু', 'sub1', 'প্রতিস্থাপন', সাব { "quux"}); Foo বিন্যাস :: sub1 (); # "Quux" $ H3 undef বলছেন; Foo বিন্যাস :: sub1 (); # $ H2 undef মারা যায়; Foo বিন্যাস :: sub1 (); # "যাও qux" $ H undef বলছেন; Foo বিন্যাস :: sub1 (); # "Foo বিন্যাস এর sub1" পণ্যের হোমপেজে বলেছেন

বানর :: প্যাচ :: কর্ম সম্পর্কিত সফটওয়্যার