The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

NAME

PERLANCAR::Permute::Named - Permute multiple-valued key-value pairs

VERSION

This document describes version 0.03 of PERLANCAR::Permute::Named (from Perl distribution PERLANCAR-Permute-Named), released on 2016-09-25.

SYNOPSIS

 use PERLANCAR::Permute::Named;

 my @p = permute_named(bool => [ 0, 1 ], x => [qw(foo bar baz)]);
 for (@p) {
     some_setup() if $_->{bool};
     other_setup($_->{x});
     # ... now maybe do some tests ...
 }

DESCRIPTION

This module is like Permute::Named, except that it uses a different technique: dynamically generates nested loop Perl code, evals that, and avoids repetitive deep cloning. It can be faster than Permute::Named as the number of keys and values increase.

FUNCTIONS

permute_named(@list) => @list | $arrayref

Takes a list of key-specification pairs where the specifications can be single values or references to arrays of possible actual values. It then permutes all key-specification combinations and returns the resulting list (or arrayref) of permutations, depending on context.

The function expects the pairs as an even-sized list. Each specification can be a scalar or a reference to an array of possible values.

Example 1:

 permute_named(bool => [ 0, 1 ], x => [qw(foo bar baz)])

returns:

 [ { bool => 0, x => 'foo' },
   { bool => 0, x => 'bar' },
   { bool => 0, x => 'baz' },
   { bool => 1, x => 'foo' },
   { bool => 1, x => 'bar' },
   { bool => 1, x => 'baz' }, ]

Example 2:

 permute_named(bool => 1, x => 'foo')

just returns the one permutation:

 {bool => 1, x => 'foo'}

HOMEPAGE

Please visit the project's homepage at https://metacpan.org/release/PERLANCAR-Permute-Named.

SOURCE

Source repository is at https://github.com/perlancar/perl-PERLANCAR-Permute-Named.

BUGS

Please report any bugs or feature requests on the bugtracker website https://rt.cpan.org/Public/Dist/Display.html?Name=PERLANCAR-Permute-Named

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.

SEE ALSO

Permute::Named, Permute::Named::Iter and CLI <permute-named>

Set::CrossProduct and cross

AUTHOR

perlancar <perlancar@cpan.org>

COPYRIGHT AND LICENSE

This software is copyright (c) 2016 by perlancar@cpan.org.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.