/ .* /?$k=$':$k<($a=abs$_-$&)or$r=$.-1,$k=$a-1while<>;print$r||"Unlucky!"