use v6;


my %kv1 = :LiteralKey<LiteralValue>;

say :%kv1.perl;



my %kv2 = <LiteralKey>,<LiteralValue>;

say :%kv2.perl;



my $var3 = 'Literal';
my %kv3  = "{$var3}key",'LiteralValue';

say :%kv3.perl;



my $var4 = 'LiteralKey';
my %kv4  = "$var4",'LiteralValue';

say :%kv4.perl;