use constant MIN_CHAR => scalar 1; use constant MAX_CHAR => scalar 12; print 'x '.MIN_CHAR.'-'.MAX_CHAR.' x';