line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
1
|
|
|
|
|
|
|
|
2
|
|
|
|
|
|
|
package IS::Conf; |
3
|
1
|
|
|
1
|
|
541
|
use strict; |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
39
|
|
4
|
|
|
|
|
|
|
|
5
|
|
|
|
|
|
|
BEGIN { |
6
|
1
|
|
|
1
|
|
6
|
use Exporter (); |
|
1
|
|
|
|
|
2
|
|
|
1
|
|
|
|
|
29
|
|
7
|
1
|
|
|
1
|
|
5
|
use vars qw ($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS); |
|
1
|
|
|
|
|
5
|
|
|
1
|
|
|
|
|
142
|
|
8
|
1
|
|
|
1
|
|
3
|
$VERSION = 0.01; |
9
|
1
|
|
|
|
|
15
|
@ISA = qw (Exporter); |
10
|
|
|
|
|
|
|
#Give a hoot don't pollute, do not export more than needed by default |
11
|
1
|
|
|
|
|
2
|
@EXPORT = qw (); |
12
|
1
|
|
|
|
|
2
|
@EXPORT_OK = qw (); |
13
|
1
|
|
|
|
|
49
|
%EXPORT_TAGS = (); |
14
|
|
|
|
|
|
|
} |
15
|
|
|
|
|
|
|
|
16
|
|
|
|
|
|
|
########################################### main pod documentation begin ## |
17
|
|
|
|
|
|
|
# Below is the stub of documentation for your module. You better edit it! |
18
|
|
|
|
|
|
|
|
19
|
|
|
|
|
|
|
=head1 NAME |
20
|
|
|
|
|
|
|
|
21
|
|
|
|
|
|
|
IS::Conf - Infrastructure Configuration Management |
22
|
|
|
|
|
|
|
|
23
|
|
|
|
|
|
|
=head1 SYNOPSIS |
24
|
|
|
|
|
|
|
|
25
|
|
|
|
|
|
|
use IS::Conf; |
26
|
|
|
|
|
|
|
|
27
|
|
|
|
|
|
|
=head1 DESCRIPTION |
28
|
|
|
|
|
|
|
|
29
|
|
|
|
|
|
|
Placeholder for the new IS::* modules which make up isconf version 4.X |
30
|
|
|
|
|
|
|
-- see Infrastructures.Org for background. |
31
|
|
|
|
|
|
|
|
32
|
|
|
|
|
|
|
=head1 USAGE |
33
|
|
|
|
|
|
|
|
34
|
|
|
|
|
|
|
=head1 BUGS |
35
|
|
|
|
|
|
|
|
36
|
|
|
|
|
|
|
=head1 SUPPORT |
37
|
|
|
|
|
|
|
|
38
|
|
|
|
|
|
|
=head1 AUTHOR |
39
|
|
|
|
|
|
|
|
40
|
|
|
|
|
|
|
Steve Traugott |
41
|
|
|
|
|
|
|
CPAN ID: STEVEGT |
42
|
|
|
|
|
|
|
stevegt@TerraLuna.Org |
43
|
|
|
|
|
|
|
http://www.stevegt.com |
44
|
|
|
|
|
|
|
|
45
|
|
|
|
|
|
|
=head1 COPYRIGHT |
46
|
|
|
|
|
|
|
|
47
|
|
|
|
|
|
|
Copyright (c) 2002 Steve Traugott. All rights reserved. |
48
|
|
|
|
|
|
|
This program is free software; you can redistribute |
49
|
|
|
|
|
|
|
it and/or modify it under the same terms as Perl itself. |
50
|
|
|
|
|
|
|
|
51
|
|
|
|
|
|
|
The full text of the license can be found in the |
52
|
|
|
|
|
|
|
LICENSE file included with this module. |
53
|
|
|
|
|
|
|
|
54
|
|
|
|
|
|
|
=head1 SEE ALSO |
55
|
|
|
|
|
|
|
|
56
|
|
|
|
|
|
|
perl(1). |
57
|
|
|
|
|
|
|
|
58
|
|
|
|
|
|
|
=head1 PUBLIC METHODS |
59
|
|
|
|
|
|
|
|
60
|
|
|
|
|
|
|
Each public function/method is described here. |
61
|
|
|
|
|
|
|
These are how you should interact with this module. |
62
|
|
|
|
|
|
|
|
63
|
|
|
|
|
|
|
=cut |
64
|
|
|
|
|
|
|
|
65
|
|
|
|
|
|
|
############################################# main pod documentation end ## |
66
|
|
|
|
|
|
|
|
67
|
|
|
|
|
|
|
|
68
|
|
|
|
|
|
|
# Public methods and functions go here. |
69
|
|
|
|
|
|
|
|
70
|
|
|
|
|
|
|
|
71
|
|
|
|
|
|
|
|
72
|
|
|
|
|
|
|
########################################### main pod documentation begin ## |
73
|
|
|
|
|
|
|
|
74
|
|
|
|
|
|
|
=head1 PRIVATE METHODS |
75
|
|
|
|
|
|
|
|
76
|
|
|
|
|
|
|
Each private function/method is described here. |
77
|
|
|
|
|
|
|
These methods and functions are considered private and are intended for |
78
|
|
|
|
|
|
|
internal use by this module. They are B considered part of the public |
79
|
|
|
|
|
|
|
interface and are described here for documentation purposes only. |
80
|
|
|
|
|
|
|
|
81
|
|
|
|
|
|
|
=cut |
82
|
|
|
|
|
|
|
|
83
|
|
|
|
|
|
|
############################################# main pod documentation end ## |
84
|
|
|
|
|
|
|
|
85
|
|
|
|
|
|
|
|
86
|
|
|
|
|
|
|
# Private methods and functions go here. |
87
|
|
|
|
|
|
|
|
88
|
|
|
|
|
|
|
|
89
|
|
|
|
|
|
|
|
90
|
|
|
|
|
|
|
|
91
|
|
|
|
|
|
|
|
92
|
|
|
|
|
|
|
################################################ subroutine header begin ## |
93
|
|
|
|
|
|
|
|
94
|
|
|
|
|
|
|
=head2 sample_function |
95
|
|
|
|
|
|
|
|
96
|
|
|
|
|
|
|
Usage : How to use this function/method |
97
|
|
|
|
|
|
|
Purpose : What it does |
98
|
|
|
|
|
|
|
Returns : What it returns |
99
|
|
|
|
|
|
|
Argument : What it wants to know |
100
|
|
|
|
|
|
|
Throws : Exceptions and other anomolies |
101
|
|
|
|
|
|
|
Comments : This is a sample subroutine header. |
102
|
|
|
|
|
|
|
: It is polite to include more pod and fewer comments. |
103
|
|
|
|
|
|
|
|
104
|
|
|
|
|
|
|
See Also : |
105
|
|
|
|
|
|
|
|
106
|
|
|
|
|
|
|
=cut |
107
|
|
|
|
|
|
|
|
108
|
|
|
|
|
|
|
################################################## subroutine header end ## |
109
|
|
|
|
|
|
|
|
110
|
|
|
|
|
|
|
|
111
|
|
|
|
|
|
|
|
112
|
|
|
|
|
|
|
|
113
|
|
|
|
|
|
|
1; #this line is important and will help the module return a true value |
114
|
|
|
|
|
|
|
__END__ |