use constant BIRD=>'footchicken';

##</code><code>##

  { BIRD => 'Valery' }

##</code><code>##

  { BIRD() => 'Valery' }
  { BIRD, 'Valery' }

##</code><code>##

  { +BIRD => 'Valery' }

##</code><code>##

use strict;
use warnings;
use Data::Dumper;
use constant { BIRD => 'footchicken' };
print Dumper(+{ +BIRD => 'Valery' });

##</code><code>##

$VAR1 = {
          'BIRD' => 'Valery'
        };