while (@values=$sth->fetchrow_arrayref){
@values='';