my %hash = map { my $item = pop @$_; map { $_, $item } @$_ }