Re: Using a hash with the @ sigil

[choroba]

It's so called "hash slice".

use warnings;
use strict;

use Data::Dumper;

my @arr = qw( a b c );
my %h;
@h{@arr} = (3, 4, 5);  # @hash{keys} = values
print Dumper(\%h);

__END__
Output:
$VAR1 = {
          'c' => 5,
          'b' => 4,
          'a' => 3
        };

[1nickt]

Thanks choroba and all the other monks who replied...

[Anonymous Monk]

Hash slices are useful, but assigning a scalar to them is less useful. Perl could warn in that case, but I don't know that it should.

@hash{@array} = 'foo'; # converted to a 1-element list
@hash{@array} = ('foo'); # equivalent
@hash{@array} = ('foo', undef, undef); # equivalent
@hash{@array} = ('foo', 'foo', 'foo'); # arguably should be equivalent