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

Hades::Realm::Mouse - Hades realm for Mouse

VERSION

Version 0.01

SYNOPSIS

Quick summary of what the module does:

Hades->run({
	eval => q|
		Kosmos { 
			[curae penthos] :t(Int) :d(2) :pr :c :r
			geras $nosoi :t(Int) :d(5) {
				if (£penthos == $nosoi) {
					return £curae;
				}
			}
		}
	|,
	realm => 'Mouse',
});

... generates ...

package Kosmos;
use strict;
use warnings;
use Mouse;
use Types::Standard qw/Int/;
our $VERSION = 0.01;

has curae => (
	is	=> "rw",
	required  => 1,
	clearer   => "clear_curae",
	predicate => "has_curae",
	isa       => Int,
	default   => sub {2}
);

has penthos => (
	is	=> "rw",
	required  => 1,
	clearer   => "clear_curae",
	predicate => "has_curae",
	isa       => Int,
	default   => sub {2}
);

sub geras {
	my ( $self, $nosoi ) = @_;
	$nosoi = defined $nosoi ? $nosoi : 5;
	if ( !defined($nosoi) || ref $nosoi || $nosoi !~ m/^[-+\d]\d*$/ ) {
		$nosoi = defined $nosoi ? $nosoi : 'undef';
		die qq{Int: invalid value $nosoi for variable \$nosoi in method geras};
	}
	if ( £penthos == $nosoi ) { return £curae; }
}

1;

__END__

NOTE: coerce and private attributes currently do not work with Mouse.

SUBROUTINES/METHODS

new

Instantiate a new Hades::Realm::Mouse object.

Hades::Realm::Mouse->new

build_as_role

call build_as_role method.

build_as_class

call build_as_class method.

build_has

call build_has method. Expects param $meta to be a HashRef.

$obj->build_has($meta)

build_accessor_predicate

call build_accessor_predicate method. Expects param $name to be a Str, param $content to be a Str.

$obj->build_accessor_predicate($name, $content)

build_accessor_clearer

call build_accessor_clearer method. Expects param $name to be a Str, param $content to be a Str.

$obj->build_accessor_clearer($name, $content)

build_accessor_builder

call build_accessor_builder method. Expects param $name to be a Str, param $content to be a Str.

$obj->build_accessor_builder($name, $content)

AUTHOR

LNATION, <email at lnation.org>

BUGS

Please report any bugs or feature requests to bug-hades::realm::mouse at rt.cpan.org, or through the web interface at https://rt.cpan.org/NoAuth/ReportBug.html?Queue=Hades-Realm-Mouse. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc Hades::Realm::Mouse

You can also look for information at:

ACKNOWLEDGEMENTS

LICENSE AND COPYRIGHT

This software is Copyright (c) 2020 by LNATION.

This is free software, licensed under:

The Artistic License 2.0 (GPL Compatible)

1 POD Error

The following errors were encountered while parsing the POD:

Around line 143:

Non-ASCII character seen before =encoding in '(£penthos'. Assuming UTF-8