ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Alexander Botarjev                   2:5049/139     15 Jun 2001  18:05:26
 To : All
 Subject : mod_perl&DBI
 -------------------------------------------------------------------------------- 
 

 Вопрос: если используется один коннект к базе Оракла, то не будет ли вызывать
 commit в одном скрипте фиксацию всех изменений, сделанных в других скриптах,
 использующих этот коннект к базе?
 Конкретно:
 
 === Используем общий коннект ===
 package My::DB;
 
 use strict;
 use locale;
 use DBI;
 
 sub connect {
         if (defined $My::DB::conn) {
                 eval {
                         $My::DB::conn->ping;
                 };
                 if (!$@) {
                         return $My::DB::conn;
                 }
         }
 
         $My::DB::conn = DBI->connect(
                 'dbi:Oracle:host=x.x.x.x;sid=xxx;port=xxx', 'xxxx','xxxx', {
                         PrintError => 1,
                         RaiseError => 1,
                         AutoCommit => 0
                 }
         ) || die $DBI::errstr; #Assume application handles this
 
         return $My::DB::conn;
 }
 
 1;
 
 ======кусок программы===============
 
 sub main {
 
  my $dbh = My::DB->connect;
 
  my $baz = $r->param('baz');
 
  eval {
 # выполняем действия с данными
 
         $dbh->commit;
 };
 if ($@) {
         $dbh->rollback;
 }
 
 ========================================
 
 Alexander
 
 --- GoldED/LNX 3.0.1
  * Origin:  (2:5049/139)
 
 

Вернуться к списку тем, сортированных по: возрастание даты  уменьшение даты  тема  автор 

Тема:    Автор:    Дата:    mod_perl&DBI   Alexander Botarjev   15 Jun 2001 18:05:26   Re: mod_perl&DBI   Pavel Ammosov   17 Jun 2001 22:46:26   Re: mod_perl&DBI   Artem Chuprina   02 Aug 2001 17:44:41