sub build_hash {
    ( @keys, @_ )[ map { $_, $_ + @keys } 0 .. $#keys ];
}