gistfile1.txt

    has "coerce" => (
        is      => 'rw',
        lazy    => 1,
        reader  => "should_coerce",
        default => sub {
            return 1 if shift->type_constraint->has_coercion;
            return 0;
        }
    );