NAME
Scalar::Induce - Unfolding scalars
VERSION
version 0.05
SYNOPSIS
my @reversed = induce { @$_ ? pop @$_ : void undef $_ } [ 1 .. 10 ];
my @chunks = induce { (length) ? substr $_, 0, 3, '' : void undef $_ } "foobarbaz";
FUNCTIONS
All functions are exported by default.
induce
This function takes a block and a scalar as arguments and then repeatedly applies the block to the value, accumulating the return values to eventually return them as a list. It does the opposite of reduce, hence its name. It's called unfold in some other languages.
void
This is a utility function that always returns an empty list (or undefined in scalar context). This makes a lot of inductions simpler.
ACKNOWLEDGEMENTS
Aristotle Pagaltzis came up with this idea (http://use.perl.org/~Aristotle/journal/37831). Leon Timmermans re-implemented it in XS and uploaded it to CPAN.
AUTHOR
Leon Timmermans <leont@cpan.org>
COPYRIGHT AND LICENSE
This software is copyright (c) 2009 by Leon Timmermans.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.