while (($cake_no, $cdid,$mid, $title, $imdb) = $Config{sth}->fetchrow) {