> > But...
> > I found a line in startup.pl, which brokes Apache:
> > use DBD::Oracle
> >
> > I don't know why, but simple scripts on this machine kinda
> > --------------
> > use strict;
> > use DBI;
> >
> > $ENV{ORACLE_HOME} = "/u01/app/oracle/product/8.1.7";
> > $ENV{NLS_LANG} = "AMERICAN_AMERICA.CL8MSWIN1251";
> >
> > my $dbh = DBI->connect('DBI:Oracle:SIMain', '', '');
> > my $news = $dbh->selectrow_array("select count(*) from
portal.contents");
> > print "$news\n";
> > $dbh->disconnect;
> > --------------
> > works fine...
>
> But you don't load DBD::Oracle explicitly here, as you do in the
startup.pl.
> Any difference if you omit 'use DBD::Oracle' and just keep 'use DBI'?

I just wanted to load DBD::Oracle in parent process for sharing it among
children.
(and it works fine for statically compiled mod_perl)...
-------------
use strict;
use DBI;

my $r = shift;
$r->send_http_header('text/plain');
my $dbh = DBI->connect('DBI:Oracle:SIMain', '', '');
my $news = $dbh->selectrow_array("select count(*) from portal.contents");
$r->print ($news);
-------------
Although above Apache::Registry script works for DSO mod_perl ...

--
Sergey Polyakov                 aka BeerBong
Chief of WebZavod     http://www.webzavod.ru
Tel. +7 (8462) 43-93-85 | +7 (8462) 43-93-86
          mailto:[EMAIL PROTECTED]


-- 
Reporting bugs: http://perl.apache.org/bugs/
Mail list info: http://perl.apache.org/maillist/modperl.html

Reply via email to