Записать в файл CSV из хеш-Perl

У меня есть программа, которая в данный момент читает изФАЙЛ 1 похож на приведенный ниже и соответствует определенным символам. например

Type, Fruit, Description, quantity
tropical, banana, tasty and yummy, 5
tropical, grapefruit, bitter and not yummy, 2
... and so on

Прежде всего я хотел создать хэш хэшей для каждогоТип', 'Фрукты ','Описание', 'Количество' и сохраните различные значения в ссылочных хешах. Это прекрасно работает с кодом ниже.

use strict;
use warnings;
use Data::Dumper;
use Text::CSV;

my %MacroA = ('Type' => {}, 'Fruit' => {}, 'Description' => {}, 'Quantity' =>  {});         

open (my $file, '

Ответы на вопрос(2)

Ваш ответ на вопрос