File Coverage

blib/lib/WWW/Google/Login/Status.pm
Criterion Covered Total %
statement 15 15 100.0
branch n/a
condition n/a
subroutine 5 5 100.0
pod n/a
total 20 20 100.0


line stmt bran cond sub pod time code
1             package WWW::Google::Login::Status;
2 1     1   6 use strict;
  1         3  
  1         34  
3 1     1   5 use Moo 2;
  1         21  
  1         28  
4              
5 1     1   341 use Filter::signatures;
  1         15  
  1         8  
6 1     1   76 use feature 'signatures';
  1         2  
  1         57  
7 1     1   6 no warnings 'experimental::signatures';
  1         9  
  1         83  
8              
9             our $VERSION = '0.01';
10              
11             has wrong_password => ( is => 'ro' );
12             has logged_in => ( is => 'ro' );
13              
14             =head1 NAME
15              
16             WWW::Google::Login::Status - status value for WWW::Google::Login
17              
18             =head1 SYNOPSIS
19              
20             if( $status->logged_in ) {
21             print "yay\n";
22             } elsif( $status->wrong_password ) {
23             print "wrong password!\n";
24             } else {
25             print "unknown error\n";
26             }
27              
28             This module isn't intended for direct usage
29              
30             =cut
31              
32             1;
33              
34             =head1 REPOSITORY
35              
36             The public repository of this module is
37             L.
38              
39             =head1 SUPPORT
40              
41             The public support forum of this module is L.
42              
43             =head1 AUTHOR
44              
45             Max Maischein C
46              
47             =head1 COPYRIGHT (c)
48              
49             Copyright 2016-2018 by Max Maischein C.
50              
51             =head1 LICENSE
52              
53             This module is released under the same terms as Perl itself.
54              
55             =cut