chop($_=<>);$a=chop()=>print qq'\n$a: ',$a&1?'odd':'even' while $_;