$_%8%3>1||$i>99?$i++:print 1 for<>