do{ my %h; @h{ 0 .. $#a } = @a; \%h };