Dmitry E. Oboukhov

NAME

DR::DateTime::MouseType - Mouse type definer

SYNOPSIS

    use DR::DateTime::MouseType;

    package Bla;
    use Mouse;

    has dt  => is => 'ro', isa => 'DRDateTime', coerce => 1;
    has mdt => is => 'ro', isa => 'MaybeDRDateTime', coerce => 1;

    package main;

    my $i = new Bla dt => time, mdt => undef;
    my $j = new Bla dt => '2017-01-00';