Is there any way to use a “constant” as hash key in Perl?

Question

Is there any way to use a constant as a hash key?

For example:

use constant X => 1;

my %x = (X => \'X\');

The above code will cr

Answer 1

=> operator interprets its left side as a "string", the way qw() does.

Try using

my %x = ( X, 'X');