ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Pavel V. Ammosov                     2:5020/52      18 Mar 2001  00:52:17
 To : Igor Mikhailov
 Subject : Re: mason, mod_perl
 -------------------------------------------------------------------------------- 
 

 
 > >> Кстати я выяснил, почему нельзя делать коннекты в секции <%once>
 > >> - она исполняется до форка.
 > PA> Я надеюсь, много времени это не заняло :-)
 > PA> В HTML::Mason::Devel это светлоcерым-по-черному написано.
 >Hу блин, а сразу мне об это написать нельзя было? :)
 
 Я просто ждал, что кто-нибудь другой ответит.  Я не очень хорошо знаю 
 HTML::Mason.  Да и не очень люблю, честно говоря.
 
 >Я не это хочу. Посмотри в HTML::Mason::Admin раздел Using global variables. Я и
 >хочу сделать, как там написано. Или выяснить, что так сделать нельзя.
 
 Я щас сделал как там написано.  Вроде работает.
 То есть:
 в handler.pl
 ...
 my $parser = new HTML::Mason::Parser (allow_globals => [qw($dbh)]);
 ...
 sub handler {
     my ($r) = @_;
   $HTML::Mason::Commands::dbh = DBI->connect('dbi:Informix:anws', '','',
    {AutoCommit=>0, RaiseError=>1});
     my $status = $ah->handle_request($r);
   $HTML::Mason::Commands::dbh->disconnect();
     
     return $status;
 }
 
 и в файле try:
 
 <ul>
 %  my $c = $dbh->prepare('select list_id, list_title from lists');
 %  $c->execute();
 %  while (my ($list_id, $list_title) = $c->fetchrow_array()) {
 <li><% $list_title %>
 %   }
 %   $c->finish;
 </ul>
 -- 
 Pavel Ammosov                                               O    \
 apavel@aha.ru                                                 __  )
 http://isabase.philol.msu.ru/~apavel/                             )
 wget -O - isabase.philol.msu.ru/~apavel/key.asc|pgp -fka    O    /
 --- slrn/0.9.6.3 (Linux)
  * Origin: Mr. Postman (2:5020/52.0)
 
 

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

Тема:    Автор:    Дата:    mason, mod_perl   Igor Mikhailov   13 Mar 2001 05:29:49   mason, mod_perl   Pavel Serdukoff   13 Mar 2001 10:13:30   mason, mod_perl   Igor Mikhailov   15 Mar 2001 11:47:26   Re: mason, mod_perl   Pavel V. Ammosov   16 Mar 2001 22:07:22   mason, mod_perl   Igor Mikhailov   17 Mar 2001 23:19:25   Re: mason, mod_perl   Pavel V. Ammosov   18 Mar 2001 00:52:17   mason, mod_perl   Igor Mikhailov   18 Mar 2001 07:04:01   Re: mason, mod_perl   Pavel V. Ammosov   18 Mar 2001 23:15:52   mason, mod_perl   Igor Mikhailov   19 Mar 2001 20:40:59   Re: mason, mod_perl   Pavel V. Ammosov   19 Mar 2001 19:34:10   mason, mod_perl   Igor Mikhailov   20 Mar 2001 04:45:13   Re: mason, mod_perl   Pavel V. Ammosov   22 Mar 2001 01:47:46   mason, mod_perl   Igor Mikhailov   22 Mar 2001 22:43:47   Re: mason, mod_perl   Pavel V. Ammosov   23 Mar 2001 19:45:01   Re: mason, mod_perl   Dmitry Dmitriev   13 Mar 2001 12:56:32   mason, mod_perl   Igor Mikhailov   15 Mar 2001 23:06:40