17 lines
198 B
Perl
17 lines
198 B
Perl
|
package MyRedland::Lusers;
|
||
|
|
|
||
|
|
use v5.34.1;
|
||
|
|
|
||
|
|
use strict;
|
||
|
|
use warnings;
|
||
|
|
|
||
|
|
use Moo;
|
||
|
|
use Types::Standard qw/InstanceOf/;
|
||
|
|
|
||
|
|
has app => (
|
||
|
|
is => 'rw',
|
||
|
|
isa => InstanceOf['Mojolicious'],
|
||
|
|
required => 1,
|
||
|
|
);
|
||
|
|
1;
|