File manager - Edit - /usr/local/cpanel/3rdparty/perl/542/cpanel-lib/OAuth/Lite2/Model/AccessToken.pm
Back
package OAuth::Lite2::Model::AccessToken; use strict; use warnings; use base 'Class::Accessor::Fast'; __PACKAGE__->mk_accessors(qw( auth_id token expires_in secret secret_type created_on )); use Params::Validate; sub new { my $class = shift; my @args = @_ == 1 ? %{$_[0]} : @_; my %params = Params::Validate::validate_with( params => \@args, spec => { auth_id => 1, token => 1, expires_in => { optional => 1 }, created_on => { optional => 1 }, secret => { optional => 1 }, secret_type => { optional => 1 }, }, allow_extra => 1, ); my $self = bless \%params, $class; return $self; } =head1 NAME OAuth::Lite2::Model::AccessToken - model class that represents access token =head1 ACCESSORS =head2 auth_id Identifier of L<OAuth::Lite2::Model::AuthInfo>. =head2 token Access token string. =head2 expires_in Seconds to expires from 'created_on' =head2 created_on UNIX time when access token created. =head2 secret DEPRECATED. =head2 secret_type DEPRECATED. =head1 AUTHOR Lyo Kato, E<lt>lyo.kato@gmail.comE<gt> =head1 COPYRIGHT AND LICENSE Copyright (C) 2010 by Lyo Kato This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.8.8 or, at your option, any later version of Perl 5 you may have available. =cut 1;
| ver. 1.4 |
Github
|
.
| PHP 8.1.34 | Generation time: 0.04 |
proxy
|
phpinfo
|
Settings