#!/usr/bin/perl -w use strict; use warnings; use POSIX; # XXX -- module use MooseX::Declare; use namespace::autoclean; # XXX -- module class Ida::Config with MooseX::Log::Log4perl is mutable { use strict; use warnings; use Moose::Util::TypeConstraints; # XXX -- some attribute has dummyAttribute => ( isa => 'Str', is => 'rw', default => sub { [] }, ); # XXX -- an unknown type method isAllowedIp(UnknownType $ip!) { return; } } 1;