$_>3&&die,print+(_,0,1,0)[$_]?odd:even for<>