File Coverage

blib/lib/HTTP/Throwable/Role/Status/MovedPermanently.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::MovedPermanently 0.028;
2             our $AUTHORITY = 'cpan:STEVAN';
3              
4 3     3   2243 use Moo::Role;
  3         15759  
  3         35  
5              
6             with(
7             'HTTP::Throwable',
8             'HTTP::Throwable::Role::Redirect',
9             'HTTP::Throwable::Role::BoringText',
10             );
11              
12 3     3 0 123 sub default_status_code { 301 }
13 3     3 0 13341 sub default_reason { 'Moved Permanently' }
14              
15 3     3   1172 no Moo::Role; 1;
  3         7  
  3         12  
16              
17             =pod
18              
19             =encoding UTF-8
20              
21             =head1 NAME
22              
23             HTTP::Throwable::Role::Status::MovedPermanently - 301 Moved Permanently
24              
25             =head1 VERSION
26              
27             version 0.028
28              
29             =head1 DESCRIPTION
30              
31             The requested resource has been assigned a new permanent URI and
32             any future references to this resource SHOULD use one of the
33             returned URIs. Clients with link editing capabilities ought to
34             automatically re-link references to the Request-URI to one or more
35             of the new references returned by the server, where possible. This
36             response is cacheable unless indicated otherwise.
37              
38             The new permanent URI SHOULD be given by the Location field in the
39             response. Unless the request method was HEAD, the entity of the
40             response SHOULD contain a short hypertext note with a hyperlink to
41             the new URI(s).
42              
43             =head1 PERL VERSION
44              
45             This library should run on perls released even a long time ago. It should work
46             on any version of perl released in the last five years.
47              
48             Although it may work on older versions of perl, no guarantee is made that the
49             minimum required version will not be increased. The version may be increased
50             for any reason, and there is no promise that patches will be accepted to lower
51             the minimum required perl.
52              
53             =head1 AUTHORS
54              
55             =over 4
56              
57             =item *
58              
59             Stevan Little
60              
61             =item *
62              
63             Ricardo Signes
64              
65             =back
66              
67             =head1 COPYRIGHT AND LICENSE
68              
69             This software is copyright (c) 2011 by Infinity Interactive, Inc.
70              
71             This is free software; you can redistribute it and/or modify it under
72             the same terms as the Perl 5 programming language system itself.
73              
74             =cut
75              
76             __END__