File Coverage

blib/lib/Net/OAuth2Server/TokenType.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1 2     2   59746 use strict; use warnings;
  2     2   14  
  2         50  
  2         8  
  2         4  
  2         82  
2              
3             package Net::OAuth2Server::TokenType;
4             our $VERSION = '0.004';
5              
6 2     2   9 use constant ();
  2         3  
  2         40  
7 2     2   8 use Exporter ();
  2         5  
  2         202  
8              
9             our %TOKEN_TYPE = (
10             TOKEN_TYPE_JWT => 'urn:ietf:params:oauth:token-type:jwt',
11             TOKEN_TYPE_ACCESS_TOKEN => 'urn:ietf:params:oauth:token-type:access_token',
12             TOKEN_TYPE_REFRESH_TOKEN => 'urn:ietf:params:oauth:token-type:refresh_token',
13             TOKEN_TYPE_ID_TOKEN => 'urn:ietf:params:oauth:token-type:id_token',
14             TOKEN_TYPE_SAML1 => 'urn:ietf:params:oauth:token-type:saml1',
15             TOKEN_TYPE_SAML2 => 'urn:ietf:params:oauth:token-type:saml2',
16             );
17              
18             constant->import( \%TOKEN_TYPE );
19             *import = \&Exporter::import;
20             our @EXPORT_OK = sort keys %TOKEN_TYPE;
21              
22             1;