Provided by: libsql-translator-perl_1.65-1_all 

NAME
SQL::Translator::Role::Error - Error setter/getter for objects and classes
SYNOPSIS
In the class consuming the role:
package Foo;
use Moo;
with qw(SQL::Translator::Role::Error);
sub foo {
...
return $self->error("Something failed")
unless $some_condition;
...
}
In code using the class:
Foo->foo or die Foo->error;
# or
$foo->foo or die $foo->error;
DESCRIPTION
This Moo::Role provides a method for getting and setting error on a class or object.
METHODS
$object_or_class->error([$message])
If called with an argument, sets the error message and returns undef, otherwise returns the message.
As an implementation detail, for compatibility with Class::Base, the message is stored in
"$object->{_ERROR}" or $Class::ERROR, depending on whether the invocant is an object.
SEE ALSO
• "Error Handling" in Class::Base
perl v5.38.2 2024-01-20 SQL::Translator::Role::Error(3pm)