File Coverage

blib/lib/HTTP/Throwable/Role/Status/NotImplemented.pm
Criterion Covered Total %
statement 8 8 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod 0 2 0.0
total 12 14 85.7


line stmt bran cond sub pod time code
1             package HTTP::Throwable::Role::Status::NotImplemented;
2             our $AUTHORITY = 'cpan:STEVAN';
3             $HTTP::Throwable::Role::Status::NotImplemented::VERSION = '0.027';
4 1     1   613 use Moo::Role;
  1         3  
  1         30  
5              
6             with(
7             'HTTP::Throwable',
8             'HTTP::Throwable::Role::BoringText',
9             );
10              
11 2     2 0 86 sub default_status_code { 501 }
12 2     2 0 7905 sub default_reason { 'Not Implemented' }
13              
14 1     1   409 no Moo::Role; 1;
  1         3  
  1         5  
15              
16             =pod
17              
18             =encoding UTF-8
19              
20             =head1 NAME
21              
22             HTTP::Throwable::Role::Status::NotImplemented - 501 Not Implemented
23              
24             =head1 VERSION
25              
26             version 0.027
27              
28             =head1 DESCRIPTION
29              
30             The server does not support the functionality required to
31             fulfill the request. This is the appropriate response when
32             the server does not recognize the request method and is
33             not capable of supporting it for any resource.
34              
35             =head1 AUTHORS
36              
37             =over 4
38              
39             =item *
40              
41             Stevan Little
42              
43             =item *
44              
45             Ricardo Signes
46              
47             =back
48              
49             =head1 COPYRIGHT AND LICENSE
50              
51             This software is copyright (c) 2011 by Infinity Interactive, Inc.
52              
53             This is free software; you can redistribute it and/or modify it under
54             the same terms as the Perl 5 programming language system itself.
55              
56             =cut
57              
58             __END__