1 |
< |
# |
2 |
< |
# SearchPath.pm |
3 |
< |
# |
4 |
< |
# Originally Written by Christopher Williams |
5 |
< |
# |
6 |
< |
# Description |
7 |
< |
# |
8 |
< |
# Interface |
9 |
< |
# --------- |
10 |
< |
# new() : A new SearchPath object |
1 |
> |
=head1 NAME |
2 |
> |
|
3 |
> |
Utilities::SearchPath - Utility for path searching. |
4 |
> |
|
5 |
> |
=head1 SYNOPSIS |
6 |
> |
|
7 |
> |
my $obj = Utilities::SearchPath->new(); |
8 |
> |
|
9 |
> |
=head1 METHODS |
10 |
> |
|
11 |
> |
=over |
12 |
> |
|
13 |
> |
=cut |
14 |
|
|
15 |
|
package SearchPath; |
16 |
|
|
17 |
+ |
=item C<new()> |
18 |
+ |
|
19 |
+ |
Create a new SearchPath object. |
20 |
+ |
|
21 |
+ |
=cut |
22 |
+ |
|
23 |
|
sub new { |
24 |
|
my $class=shift; |
25 |
|
$self={}; |
27 |
|
return $self; |
28 |
|
} |
29 |
|
|
30 |
+ |
=back |
31 |
+ |
|
32 |
+ |
=head1 AUTHOR |
33 |
+ |
|
34 |
+ |
Originally Written by Christopher Williams. |
35 |
+ |
|
36 |
+ |
=head1 MAINTAINER |
37 |
+ |
|
38 |
+ |
Shaun ASHBY L<mailTo:Shaun.Ashby@cern.ch> |
39 |
+ |
|
40 |
+ |
=cut |