in reply to Re: wise ones, your help is needed
in thread wise ones, your help is needed

works like a charm 
while (( my $id1, my $text) = $sqlquery3->fetchrow_array) 
    {    $text = '' if not defined $text;
        push @list3, "$id1\t$text\n";
    }

[download]

Replies are listed 'Best First'.
Re: Re: Re: wise ones, your help is needed
by japhy (Canon) on May 02, 2001 at 21:27 UTC
    The "more standard" (?) way of writing that would be: 
    while (my ($id1, $text) = ...) { ... }

    [download]
    That is, declaring both variables at the same time. It looks nicer that way, I feel.

    japhy -- Perl and Regex Hacker
[reply]
[d/l]

In Section Seekers of Perl Wisdom