ru.cgi.perl

 
 - RU.CGI.PERL ------------------------------------------------------------------
 From : Andrew Kulinich                      2:4626/15.34   29 May 2002  01:34:24
 To : All
 Subject : $sth->fetchrow_hashref;
 -------------------------------------------------------------------------------- 
 

 
 Есть следующее место в проге:
 my $dbh = DBI->connect("DBI:mysql:database=base;host=localhost", 'user',
 'pass',{RaiseError=>1}) or die $DBI::errstr;
 my $sth=$dbh->prepare("SELECT * FROM person WHERE name='$names{'name'}'");
 
 $sth->execute;
 
 my $n = $sth->fetchrow_hashref; #
     my %nn=%$n;                 #(1)
 #my %nn=$sth->fetchrow_hashref; #(2)
 
 $sth->finish;
 
 При работе какое-то шаманство: один раз раз работает первый вариант, а потом
 вдруг хоп и
 Can't use an undefined value as a HASH reference at d:/cgi-bin/adnd/addstat.cgi 
 line 40.
 Включаю второй вариант - все работает.
 $CGI::VERSION='2.66';
 mod_perl 5.6.0
 
 DIXI
 
 --- GoldED+/W32 1.1.4.7
  * Origin: Посинение трупа является первым признаком смерти. (2:4626/15.34)
 
 

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