org/netfrag/preambel.pm

## ---------------------------------------------------------------------------
##  $Id: releaseMe.pl,v 1.1 2003/01/20 21:22:18 joko Exp $
## ---------------------------------------------------------------------------
##  $Log: releaseMe.pl,v $
## ---------------------------------------------------------------------------


package org::netfrag::preambel;

use strict;
use warnings;

# determine and set 'libpath' at runtime, but before execution
my $libpath;
BEGIN {
  use FindBin qw($Bin);
  $libpath = "$Bin/../../../libs";
}

# use '$libpath' path to look for additional modules
use lib $libpath;

1;
1	## ---------------------------------------------------------------------------
2	## $Id: releaseMe.pl,v 1.1 2003/01/20 21:22:18 joko Exp $
3	## ---------------------------------------------------------------------------
4	## $Log: releaseMe.pl,v $
5	## ---------------------------------------------------------------------------
6
7
8	package org::netfrag::preambel;
9
10	use strict;
11	use warnings;
12
13	# determine and set 'libpath' at runtime, but before execution
14	my $libpath;
15	BEGIN {
16	use FindBin qw($Bin);
17	$libpath = "$Bin/../../../libs";
18	}
19
20	# use '$libpath' path to look for additional modules
21	use lib $libpath;
22
23	1;
MailToCvsAdmin">MailToCvsAdmin	ViewVC Help
Powered by ViewVC 1.1.26