src/Utilities/SearchPath.pm


BEGIN { 
die "Utilities::SearchPath: I am USED!!","\n";
};

=head1 NAME

Utilities::SearchPath - Utility for path searching.

=head1 SYNOPSIS

        my $obj = Utilities::SearchPath->new();

=head1 METHODS

=over

=cut

package SearchPath;

=item   C<new()>

Create a new SearchPath object.
   
=cut
   
sub new {
        my $class=shift;
        $self={};
        bless $self, $class;
        return $self;
}

=back

=head1 AUTHOR

Originally Written by Christopher Williams.
   
=head1 MAINTAINER

Shaun ASHBY 

=cut
Revision:	1.7
Committed:	Fri Jan 14 17:36:44 2011 UTC (14 years, 4 months ago) by muzaffar
Content type:	text/plain
Branch:	MAIN
CVS Tags:	HEAD
Changes since 1.6:	+0 -0 lines
State:	*FILE REMOVED*
Error occurred while calculating annotation data.
Log Message:	merged SCRAM_V2 branch in to head
#	Content
1
2	BEGIN {
3	die "Utilities::SearchPath: I am USED!!","\n";
4	};
5
6	=head1 NAME
7
8	Utilities::SearchPath - Utility for path searching.
9
10	=head1 SYNOPSIS
11
12	my $obj = Utilities::SearchPath->new();
13
14	=head1 METHODS
15
16	=over
17
18	=cut
19
20	package SearchPath;
21
22	=item C<new()>
23
24	Create a new SearchPath object.
25
26	=cut
27
28	sub new {
29	my $class=shift;
30	$self={};
31	bless $self, $class;
32	return $self;
33	}
34
35	=back
36
37	=head1 AUTHOR
38
39	Originally Written by Christopher Williams.
40
41	=head1 MAINTAINER
42
43	Shaun ASHBY
44
45	=cut