c:\@Work\Perl>perl -MData::Dump -le
"use warnings;
 use strict;
 ;;
 my %hash = (
   'accents' => 'utf-8',
   'accounting' => 'money',
   'bank' => 'money'.
   'ing' => 'money',
   'foo' => 'bar'.
   'perls' => 'perl',
   );
 dd \%hash;
"
{
  accents    => "utf-8",
  accounting => "money",
  bank       => "moneying",
  barperls   => "perl",
  money      => "foo",
}

##</code><code>##

c:\@Work\Perl>perl -MData::Dump -le
"use warnings;
 use strict;
 ;;
 my %hash = qw(
   accents utf-8
   accounting money
   bank money
   ing money
   foo 1
   perls perl
   );
 dd \%hash;
"
{
  accents => "utf-8",
  accounting => "money",
  bank => "money",
  foo => 1,
  ing => "money",
  perls => "perl",
}