Surprising DBD::Oracle error raised

    $price_sth->execute;
    my ($o_file_price) = $price_sth->fetchrow_array();
    if ($price_sth->fetch) {
        $this->log_error('ERROR: scalar select returned second row at
%s line %d', __FILE__, __LINE__);
    }


I expected the fetch to return undef, but it throws an Oracle error.
My best ignorant guess here is that fetchrow_array does some cleanup
on one-row datasets, but that isn't documented.

Advise?


-- 
The one L lama, he's a priest
The two L llama, he's a beast
And I will bet my silk pyjama
There isn't any three L lllama. -- Ogden Nash