|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Dmitry Stepanov 2:5020/400 07 Jun 2002 14:18:55 To : Eugene Grosbein Subject : Re: fetchrow -------------------------------------------------------------------------------- "Eugene Grosbein" <Eugene.Grosbein@f1.n5006.z2.fidonet.org> сообщил/сообщила в новостях следующее: news:915525761@www.svzserv.kemerovo.su... > Привет! > Как избавиться от 'Use of uninitialized...' в таком случае? > > #!/usr/bin/perl -w > > use strict; > use DBI; > > # connect, prepare, execute (с placeholders) - везде есть контроль ошибок > # запрос типа select > ... > > foreach $user (keys %users) { > $sth->execute($use) or die; # тут может быть 0 или 1 строка ^^^^^^ тут тоже опечатка? > @status=$sth->fetchrow_array; > if(defined(@status) && defined($status[0]) { # тут регулярно > # возникает warning (когда > # нет строк) - почему? > # работа с $status[0] > } > } > > Eugene > -- > "Люди забыли эту истину," - сказал Лис, - "но ты не забывай" --- ifmail v.2.15dev5 * Origin: Gamma NNTP server Moscow Russia (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/75917ae259b9.html, оценка из 5, голосов 10
|