hi
i wish to use use constants defined in a seperate file. my problem is, that
sometimes it works sometimes it doesn't. when failing, the error_log says
Bareword is not allowed so i guess it sometimes never loads my constants file
at all.
this is my basic approach:
Package Foo:Bar;
use strict;
BEGIN {
require "Constants.lib";
}
sub handler {
my $r = shift;
...
my $sql = SQL_SELECT; # pull in constant value
....
}
is this a stupid approach, and if so what would be a more correct solution?
(i would prefer _not_ to have the constant file loaded once and for all in a
startup.pl).
any suggestions appriciated
thanks
./allan
