File Coverage

blib/lib/HTTP/Throwable/Role/Status/SeeOther.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::SeeOther 0.028;
2             our $AUTHORITY = 'cpan:STEVAN';
3              
4 1     1   622 use Moo::Role;
  1         3  
  1         8  
5              
6             with(
7             'HTTP::Throwable',
8             'HTTP::Throwable::Role::Redirect',
9             'HTTP::Throwable::Role::BoringText',
10             );
11              
12 4     4 0 205 sub default_status_code { 303 }
13 4     4 0 17618 sub default_reason { 'See Other' }
14              
15 1     1   404 no Moo::Role; 1;
  1         2  
  1         6  
16              
17             =pod
18              
19             =encoding UTF-8
20              
21             =head1 NAME
22              
23             HTTP::Throwable::Role::Status::SeeOther - 303 See Other
24              
25             =head1 VERSION
26              
27             version 0.028
28              
29             =head1 DESCRIPTION
30              
31             The response to the request can be found under a different URI
32             and SHOULD be retrieved using a GET method on that resource.
33             This method exists primarily to allow the output of a
34             POST-activated script to redirect the user agent to a selected
35             resource. The new URI is not a substitute reference for the
36             originally requested resource. The 303 response MUST NOT be
37             cached, but the response to the second (redirected) request
38             might be cacheable.
39              
40             The different URI SHOULD be given by the Location field in
41             the response. Unless the request method was HEAD, the entity
42             of the response SHOULD contain a short hypertext note with a
43             hyperlink to the new URI(s).
44              
45             =head1 PERL VERSION
46              
47             This library should run on perls released even a long time ago. It should work
48             on any version of perl released in the last five years.
49              
50             Although it may work on older versions of perl, no guarantee is made that the
51             minimum required version will not be increased. The version may be increased
52             for any reason, and there is no promise that patches will be accepted to lower
53             the minimum required perl.
54              
55             =head1 AUTHORS
56              
57             =over 4
58              
59             =item *
60              
61             Stevan Little
62              
63             =item *
64              
65             Ricardo Signes
66              
67             =back
68              
69             =head1 COPYRIGHT AND LICENSE
70              
71             This software is copyright (c) 2011 by Infinity Interactive, Inc.
72              
73             This is free software; you can redistribute it and/or modify it under
74             the same terms as the Perl 5 programming language system itself.
75              
76             =cut
77              
78             __END__