Невозможно вызвать метод "dclone" по необъявленной ссылке

Question

Я получаю следующую ошибку.

"Can't call method "dclone" on unblessed reference"

Что означает " необязательная ссылка " и как ее исправить.Пожалуйста, обратитесь к приведенному ниже коду.

Код

use strict;                                                                        
use warnings;                                                                      
use YAML::XS 'LoadFile';                                                           
use Data::Dumper;                                                                  

my $config = LoadFile('config.yml');                                               
my $record1 = $config->{Record1};                                                  
print "record1: $record1\n";                                                       
print Dumper($config);                                                             

$config->{Record2} =  dclone $config->{Record1};                                   
print Dumper($config);

Ниже приводится вывод

record1: ARRAY(0x275fa88)
$VAR1 = {
          'Record1' => [
                         {
                           'Name' => 'Karun'
                         },
                         {
                           'Phone' => 123
                         }
                       ]
        };
Can't call method "dclone" on unblessed reference at p1.pl line 11.

Answer 1

dclone не является основной функцией в Perl и не предоставляется импортированными вами модулями.Это обеспечивается Storable .Скорее всего, вы пропали без вести