File Coverage

blib/lib/CAS/Apache.pm
Criterion Covered Total %
statement 7 9 77.7
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 10 12 83.3


line stmt bran cond sub pod time code
1             package CAS::Apache;
2              
3 1     1   26338 use warnings;
  1         2  
  1         31  
4 1     1   6 use strict;
  1         1  
  1         54  
5              
6             =head1 NAME
7              
8             CAS::Apache - The great new CAS::Apache!
9              
10             =head1 VERSION
11              
12             Version 0.45
13              
14             =cut
15              
16             our $VERSION = '0.45';
17             #use Apache2::Const qw(OK);
18             #use CAS::Apache::UserForms ();
19             #use CGI qw(fatalsToBrowser);
20 1     1   798 use Apache2::RequestRec ();
  0            
  0            
21             use Apache2::RequestIO ();
22              
23             $| = 1;
24              
25             =head1 SYNOPSIS
26              
27             Quick summary of what the module does.
28              
29             Perhaps a little code snippet.
30              
31             use CAS::Apache;
32              
33             my $foo = CAS::Apache->new();
34             ...
35              
36             =head1 EXPORT
37              
38             A list of functions that can be exported. You can delete this section
39             if you don't export anything, such as for a purely object-oriented module.
40              
41             =head1 FUNCTIONS
42              
43             =head2 function1
44              
45             =cut
46              
47              
48             # write wrappers for the appropriate cas messaging functions
49              
50             =head1 TO DO
51              
52             Write wrappers for CAS messaging for more useful behavior under mod_perl and to
53             allow CAS-Apache handlers to use same methodology.
54              
55             Sort out how to have CAS::Apache::Auth determine clients dynamically (perhaps
56             a conf.d/client.conf PerlSetVar Client Dynamic(|Static), or just have
57             CLIENT_ID set to Dynamic or Lookup or such non-numeric?
58              
59             Decide how to implement permission trees, so that a single top level
60             directory need be granted, and where that gets configured.
61              
62             =head1 AUTHOR
63              
64             Sean P. Quinlan, C<< >>
65              
66             =head1 BUGS
67              
68             Please report any bugs or feature requests to
69             C, or through the web interface at
70             L.
71             I will be notified, and then you'll automatically be notified of progress on
72             your bug as I make changes.
73              
74             =head1 SUPPORT
75              
76             You can find documentation for this module with the perldoc command.
77              
78             perldoc CAS::Apache
79              
80             You can also look for information at:
81              
82             =over 4
83              
84             =item * AnnoCPAN: Annotated CPAN documentation
85              
86             L
87              
88             =item * CPAN Ratings
89              
90             L
91              
92             =item * RT: CPAN's request tracker
93              
94             L
95              
96             =item * Search CPAN
97              
98             L
99              
100             =back
101              
102             =head1 ACKNOWLEDGEMENTS
103              
104             =head1 COPYRIGHT & LICENSE
105              
106             Copyright 2006 Sean P. Quinlan, all rights reserved.
107              
108             This program is free software; you can redistribute it and/or modify it
109             under the same terms as Perl itself.
110              
111             =cut
112              
113             1; # End of CAS::Apache