$x=$l[$_]=//>grep$l[-$_],@@=(@@,($_)x!grep$'%$_<1,2..sqrt)for 2..<>;print$x?Lose:Win