Keyword::With - provide new syntax to use a 'given' statement without an experimental warning
version 0.003
Provide a construct almost identical to `given (...) { }` that evaluates an list expression in scalar context (assigning it to `$_`) then executing a block of code.
Keyword::With
use Keyword::With;
with (5*3) {
print;
}
or
with ( some_func() ) {
print "matches\n" if grep { m/$_/ } qr/abc/, qr/def/;
print "does not match\n";
}
No experimental warning
Cannot use builtins that modify `$_` with with blocks because they will clobber the `$_` value set by `with (...) { }`. This was already a disadvantage of given blocks. A reasonable approach would be to create a new lexical variable within the `with` block:
with ( [qw(1 2 3 5 8 13 21)] ) {
my @first_7_fibs = @$_;
my @new_first_7_fibs = map { $_ + 1 } @first_7_fibs;
...
}
Hunter McMillen mcmillhj@gmail.com
This software is copyright (c) 2016 by Hunter McMillen.
This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.