package WebService::Mattermost::V4::API::Object::Role::ExpiresAt; # ABSTRACT: Adds an "expires_at" field to an object. use Moo::Role; use Types::Standard qw(InstanceOf Int Maybe); ################################################################################ has expires_at => (is => 'ro', isa => Maybe[Int], lazy => 1, builder => 1); has expires => (is => 'ro', isa => Maybe[InstanceOf['DateTime']], lazy => 1, builder => 1); ################################################################################ sub _build_expires_at { my $self = shift; return $self->raw_data->{expires_at}; } sub _build_expires { my $self = shift; return $self->_from_epoch($self->expires_at); } ################################################################################ 1; __END__ =pod =encoding UTF-8 =head1 NAME WebService::Mattermost::V4::API::Object::Role::ExpiresAt - Adds an "expires_at" field to an object. =head1 VERSION version 0.31 =head1 DESCRIPTION Attach common timestamps to a v4::Object object. =head2 ATTRIBUTES =over 4 =item C UNIX timestamp. =item C C object. =back =head1 NAME WebService::Mattermost::V4::API::Object::Role::ExpiresAt =head1 AUTHOR Mike Jones L =head1 AUTHOR Mike Jones =head1 COPYRIGHT AND LICENSE This software is Copyright (c) 2023 by Mike Jones. This is free software, licensed under: The MIT (X11) License =cut