Estou dando algumas manutenções em um sistema em Perl (linguagem que sou noob) e precisei criar um novo módulo de relatório onde preciso resolver a seguinte situação:

Tenho 2 arrays com os seguintes formatos

    @head = ("nomeinstituicao", "cnpjinstituicao","nomecliente", "cnpjcliente", "notacliente" );
    
    @data = ("inst1", "12345678000112","joao", 
     "87654321000198","5","inst2","54387612000123","maria","45612387000123","6",...);

Preciso produzir um hash no seguinte formato:

    %hash = (
    
    "nomeinstituicao" => "inst1",
    "cnpjinstituicao" => "12345678000112",
    "nomecliente" => "joao",
    "cnpjcliente" => "87654321000198",
    "notacliente" => "5",
    "nomeinstituicao" => "inst2",
    "cnpjinstituicao" => "54387612000123",
    "nomecliente" => "maria",
    "cnpjcliente" => "45612387000123",
    "notacliente" => "6",
    ...
    );

Alguém poderia me ajudar com uma forma de fazer esta transformação de maneira dinâmica levando em consideração que os dados contidos em `$data` estou buscando no BD.

Estou tentando o dia todo e não consegui até agora, tentei com `map` e com `while` mas acho que não estou fazendo certo.