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

Higher-order functions and lambdas

The [+] reduction operator that we have just seen in the previous section is performing the action of the + operator as many times as needed to add up all the elements of the provided data.

In Perl 6, there is an alternative way of doing reduction operations. There exists a built-in function reduce that expects a code block that will execute the action. First, we will use the function add($a, $b) that we created in Chapter 2, Writing Code:

sub add($a, $b) {
return $a + $b;
}

say reduce &add, 10..15;

The reduce function takes the reference to a function as the first argument and a flattened list of values. In &add, the ampersand before the name of the function tells Perl 6 that this is not a function call but a code reference to a function.

The reduce function is an example of the higher-order function. One of its arguments is another...

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 AU $19.99/month. Cancel anytime}