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

Tie::Moose::Forgiving - don't die at the mere mention of an unknown key

SYNOPSIS

        tie my %bob, "Tie::Moose"->with_traits("Forgiving"), $bob;

DESCRIPTION

Tie::Moose is very happy to throw exceptions.

If, for example, you use a hash key that doesn't correspond to one of the object's attributes, it will croak. Even if you used exists!

This trait prevents read-only accesses from throwing due to unknown attributes.

        use v5.14;
        
        package Person {
                use Moose;
                has name => (
                        is     => "rw",
                        isa    => "Str",
                );
                has age => (
                        is     => "rw",
                        isa    => "Num",
                        reader => "get_age",
                        writer => "set_age",
                );
        }
        
        my $bob = Person->new(name => "Robert");
        
        tie my %bob, "Tie::Moose"->with_traits("Forgiving"), $bob;
        
        my $x = $bob{xyz};   # ok ($x is undef)
        $bob{xyz} = $x;      # would croak

BUGS

Please report any bugs to http://rt.cpan.org/Dist/Display.html?Queue=Tie-Moose.

SEE ALSO

Tie::Moose.

AUTHOR

Toby Inkster <tobyink@cpan.org>.

COPYRIGHT AND LICENCE

This software is copyright (c) 2013 by Toby Inkster.

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

DISCLAIMER OF WARRANTIES

THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.