Чтение и запись массива из и в файл

Question

Я написал следующие функции в Perl:

sub save
{
   my($dir,$name,%hash) = @_;

   my $prop = Config::Properties->new();
   my $file = $dir."/.".$name;

   open my $fh, ">", $file or return 0;

    foreach my $p (keys(%hash))
    {
       $properties->setProperty($p => $hash{$p});
    }

   $properties->store($fh);
   close ($fh);
   return 1;
}

sub read
{
    my ($dir,$name) = @_;

    my ($user, $start_time, $workdir, $rules_file);
    my $file = $dir."/.".$name;

    open my $fh, "<", $file or return 0;

    my $prop = Config::Properties->new();
    $properties->load($fh);
    my %hash = $properties->properties;

    close ($fh);
    return %hash;
}

Чтобы сохранить конфигурационный хеш в файл и затем прочитать его.Но если одно из значений хеша является массивом, оно будет отображать только адрес этого массива.Что я должен изменить в своем коде, чтобы он поддерживал чтение и запись массивов?