Hello,
I have created the following include file located at /kpi/bin/KPIDB.pl
package KPIDB;
%config;
sub readDBConfigFile {
my $dbConfigFileName = '/kpi/cfg/databases.cfg';
my $cfgf;
my $db;
my $found = 0;
my $alias;
my $user;
On Aug 7, Shimon Ravid said:
package KPIDB;
%config;
That's doing nothing. Nothing at all.
sub readDBConfigFile {
...
}
1;
That function is defined in the KPIDB package; therefore, to call it from
your main program, you'd have to call it as KPIDB::readDBConfigFile().
I haven't
