ARKADAŞLAR KODDAKİ YANLLIŞLIK NEDİR BULAMADIM LİNKLER CALIŞMIYOR Bİ YARDIM EDİVERİN

sub urunlist;
$result1=$dbh->query($sorgu1);


$list.="";
while(@urunler=$result1->FetchRow)
$list.="n";
return $list;
}