File Coverage

blib/lib/HTTP/Throwable/Role/BoringText.pm
Criterion Covered Total %
statement 7 7 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod 0 1 0.0
total 10 11 90.9


line stmt bran cond sub pod time code
1             package HTTP::Throwable::Role::BoringText 0.028;
2             our $AUTHORITY = 'cpan:STEVAN';
3              
4 5     5   3196 use Moo::Role;
  5         13  
  5         33  
5              
6 83     83 0 274 sub text_body { $_[0]->status_line }
7              
8 5     5   1804 no Moo::Role; 1;
  5         14  
  5         44  
9              
10             =pod
11              
12             =encoding UTF-8
13              
14             =head1 NAME
15              
16             HTTP::Throwable::Role::BoringText - provide the simplest text_body method possible
17              
18             =head1 VERSION
19              
20             version 0.028
21              
22             =head1 OVERVIEW
23              
24             This role is as simple as can be. It provides a single method, C,
25             which returns the result of calling the C method.
26              
27             This method exists so that exception classes can easily be compatible with the
28             L role to provide a plain text body when
29             converted to an HTTP message. Most of the core well-known exception types
30             consume this method.
31              
32             =head1 PERL VERSION
33              
34             This library should run on perls released even a long time ago. It should work
35             on any version of perl released in the last five years.
36              
37             Although it may work on older versions of perl, no guarantee is made that the
38             minimum required version will not be increased. The version may be increased
39             for any reason, and there is no promise that patches will be accepted to lower
40             the minimum required perl.
41              
42             =head1 AUTHORS
43              
44             =over 4
45              
46             =item *
47              
48             Stevan Little
49              
50             =item *
51              
52             Ricardo Signes
53              
54             =back
55              
56             =head1 COPYRIGHT AND LICENSE
57              
58             This software is copyright (c) 2011 by Infinity Interactive, Inc.
59              
60             This is free software; you can redistribute it and/or modify it under
61             the same terms as the Perl 5 programming language system itself.
62              
63             =cut
64              
65             __END__