পার্ল ব্যবহার করে Moo
, আপনি around
সাব প্রয়োগ করতে পারেন , যা ক্লাসে অন্যান্য পদ্ধতিতে মোড়ানো হবে।
around INSERT => sub {
my $orig = shift;
my $self = shift;
print "Before the original sub\n";
my $rv = $orig->($self, @_);
print "After the original sub\n";
};
এই আচরণটি কীভাবে রাকুতে প্রয়োগ করা যেতে পারে , সম্ভবত একটি ব্যবহার করে role
?