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

Mojo::Base - Minimal Base Class For Mojo Projects

SYNOPSIS

package Car;
use base 'Mojo::Base';

__PACKAGE__->attr('driver');
__PACKAGE__->attr('doors' => 2);
__PACKAGE__->attr([qw/passengers seats/] => sub { 2 });

package main;
use Car;

my $bmw = Car->new;
print $bmw->doors;
print $bmw->doors(5)->doors;

my $mercedes = Car->new(driver => 'Sebastian');
print $mercedes->passengers(7)->passengers;

DESCRIPTION

Mojo::Base is a minimalistic base class for Mojo projects.

METHODS

new

my $instance = BaseSubClass->new;
my $instance = BaseSubClass->new(name => 'value');
my $instance = BaseSubClass->new({name => 'value'});

attr

__PACKAGE__->attr('name');
__PACKAGE__->attr([qw/name1 name2 name3/]);
__PACKAGE__->attr(name => 'foo');
__PACKAGE__->attr(name => sub { ... });
__PACKAGE__->attr([qw/name1 name2 name3/] => 'foo');
__PACKAGE__->attr([qw/name1 name2 name3/] => sub { ... });