Same as Discipulus++, I get the same output in both cases. Edit: that's because the map version is incorrect when an id_1 is repeated for distinct id_2, which the AoH that I constructed fails to demonstrate (as pointed out by choroba).

For me, the clever way to do it would be one that is easy to read, so I'd go for a for loop rather than map

If you are searching for new/unusual ways to do thing you can use postfix dereferencement to get the two values in one go: 

use feature 'postderef'; # Needed in perl 5.20 and 5.22

my @aoh = (
            { id_1 => "F1", id_2 => "F2", v => "FV" },
            { id_1 => "S1", id_2 => "S2", v => "SV" },
            { id_1 => "T1", id_2 => "T2", v => "TV" },
          );

my %hash;
foreach my $href (@aoh)
{
  my ($id_1, $id_2) = delete $href->@{'id_1', 'id_2'};
  $hash{$id_1}{$id_2} = $href;
}

[download]

But if you want to do the construction in two lines (you still have to declare the output hash), you can use the postfix version of for 

my %hash;
$hash{delete $_->{id_1}}{delete $_->{id_2}} = $_ for @aoh;

[download]

Edit: postfix deref is only available since perl v5.20, and the explicit use of the feature is required up to v5.22

Edit: s/[@]ao\Kf/h/; Thanks johngg

In reply to Re: map into a multidimensional hash by Eily
in thread map into a multidimensional hash by nikmit

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.