$n = 9_007_199_254_740_992; print 'Even' unless $n % 2;; Even