while (@data = $handle->fetchrow_array() ) {