use constant {
  zed     => 0,
  one     => 1,
  repos   => (qw(oss non-oss debug)),
  two     => 2,
};
#output:
Constant name 'non-oss' has invalid characters at -e line 3.
BEGIN failed--compilation aborted at -e line 7.