Search icon
Arrow left icon
All Products
Best Sellers
New Releases
Books
Videos
Audiobooks
Learning Hub
Newsletters
Free Learning
Arrow right icon
Perl 6 Deep Dive

You're reading from  Perl 6 Deep Dive

Product type Book
Published in Sep 2017
Publisher Packt
ISBN-13 9781787282049
Pages 402 pages
Edition 1st Edition
Languages
Author (1):
Andrew Shitov Andrew Shitov
Profile icon Andrew Shitov

Table of Contents (15) Chapters

1. What is Perl 6? 2. Writing Code 3. Working with Variables and Built-in Data Types 4. Working with Operators 5. Control Flow 6. Subroutines 7. Modules 8. Object-Oriented Programming 9. Input and Output 10. Working with Exceptions 11. Regexes 12. Grammars 13. Concurrent Programming 14. Functional Programming 15. Reactive Programming

Appending objects and classes using roles

Roles are another mechanism in modern OOP. A role is like an external part of the class, which is appended to an existing object or a class, providing some extra attributes and methods. Roles are very close to interfaces in some programming languages.

Let us take a house and make it a floating house. For simplicity, the House class has only one attribute, the area of the house. The Floating role has an attribute that keeps the weight of the floating house and the method that returns a Boolean value if the house is too heavy and is sinking:

class House {
has $.area is rw;
}

role Floating {
has $.weight is rw;

method is_sinking() {
return $!weight > 500 * $.area;
}
}

Syntactically, the only difference in creating a role is the keyword role in place of the class keyword.

From now on, there are two ways of applying a role...

lock icon The rest of the chapter is locked
Register for a free Packt account to unlock a world of extra content!
A free Packt account unlocks extra newsletters, articles, discounted offers, and much more. Start advancing your knowledge today.
Unlock this book and the full library FREE for 7 days
Get unlimited access to 7000+ expert-authored eBooks and videos courses covering every tech area you can think of
Renews at $15.99/month. Cancel anytime}