| Name : perl-PerlX-Maybe
| |
| Version : 1.202
| Vendor : obs://build_opensuse_org/devel:languages:perl
|
| Release : lp155.1.1
| Date : 2023-07-20 15:35:41
|
| Group : Unspecified
| Source RPM : perl-PerlX-Maybe-1.202-lp155.1.1.src.rpm
|
| Size : 0.05 MB
| |
| Packager : https://www_suse_com/
| |
| Summary : return a pair only if they are both defined
|
Description :
Moose classes (and some other classes) distinguish between an attribute
being unset and the attribute being set to undef. Supplying a constructor
arguments like this:
my $bob = Person->new(
name => $name,
age => $age,
);
Will result in the \'name\' and \'age\' attributes possibly being set to undef
(if the corresponding \'$name\' and \'$age\' variables are not defined), which
may violate the Person class\' type constraints.
(Note: if you are the _author_ of the class in question, you can solve this
using MooseX::UndefTolerant. However, some of us are stuck using
non-UndefTolerant classes written by third parties.)
To ensure that the Person constructor does not try to set a name or age at
all when they are undefined, ugly looking code like this is often used:
my $bob = Person->new(
defined $name ? (name => $name) : (),
defined $age ? (age => $age) : (),
);
or:
my $bob = Person->new(
(name => $name) x!!(defined $name),
(age => $age) x!!(defined $age),
);
A slightly more elegant solution is the \'maybe\' function.
|
RPM found in directory: /packages/linux-pbone/ftp5.gwdg.de/pub/opensuse/repositories/devel:/languages:/perl:/CPAN-P/15.5/noarch |
