<>;$/=$";$z^=0+<>while<>;print$z?Alice:Bob