Select Code to Download

my %hash = ('a'=>1, 'b'=>1, 'c'=>1);
@hash{'a'..'c'} = 2;

$VAR1 = {
          'a' => 2,
          'b' => undef,
          'c' => undef
        };

my %hash = ('a'=>1, 'b'=>1, 'c'=>1);
@hash{'a'..'c'} = 2;
...
%hash = ('a'=>1, 'b'=>1, 'c'=>1);
($hash{'a'}, $hash{'b'}, $hash{'c'}) = 2;
print Dumper  \%hash;