print$a+=eval->[$a]||die,$/for(<>)x99