Search icon CANCEL
Arrow left icon
Explore Products
Best Sellers
New Releases
Books
Videos
Audiobooks
Learning Hub
Conferences
Free Learning
Arrow right icon
Arrow up icon
GO TO TOP
Perl 6 Deep Dive

You're reading from   Perl 6 Deep Dive Data manipulation, concurrency, functional programming, and more

Arrow left icon
Product type Paperback
Published in Sep 2017
Publisher Packt
ISBN-13 9781787282049
Length 402 pages
Edition 1st Edition
Languages
Arrow right icon
Author (1):
Arrow left icon
Andrew Shitov Andrew Shitov
Author Profile Icon Andrew Shitov
Andrew Shitov
Arrow right icon
View More author details
Toc

Table of Contents (15) Chapters Close

1. What is Perl 6? FREE CHAPTER 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 $19.99/month. Cancel anytime