Ссылка на анонимный массив LWP, содержащий ссылку на массив, встречается как массив с одним элементом

Question

У меня небольшая проблема. Я использую LWP :: useragent и отправляю сообщение в другой скрипт. В этом скрипте я выполняю некоторую логику в строке json и нескольких файлах, переданных в анонимном массиве. Все шло хорошо, пока я не попытался нажать несколько файлов, которые я передавал в массив, и передать это как ссылку на массив в анонимном массиве.

open (IMAGE, "./flower.jpg") or die "$!"; 
open (IMAGE2, "./fw4.pdf") or die "$!"; 

$raw_string1 = do{ local $/ = undef; <IMAGE>; }; 
$raw_string2 = do{ local $/ = undef; <IMAGE2>; }; 


my @file_array; 

push(@file_array, $raw_string1); 
push(@file_array, $raw_string2); 

my $array_ref = \@file_array; 

my $data = [json_string => $json, file_array => $array_ref]; 
my $ua = LWP::UserAgent->new; 
$res = $ua->request(POST($url, $data)); 

В скрипте catch я прочитал параметры, переданные от анонимного в хэш. Я в состоянии получить доступ к JSON строка проходит без проблем, как:

my $json_post = $params{'json_string'}; 

А потом расшифровать его и делать то, что я хочу с ним все хорошо. Таким образом, я полагал, что я мог бы получить доступ к массиву ссылки, как:

my $array_ref = $params{'file_array'}; 
my @array = @$array_ref; 

также попытался

my @array = @{$array_ref}; 

Answer 1

Вы можете отправить только поток из байт через сокет. Все остальное должно быть сериализовано в поток байтов и десериализован на удаленном конце.

Ваш выбор сериализован с использованием протокола application/x-www-form-urlencoded. Он способен только сериализовать пары ключ-значение строк. Тем не менее, вы пытаетесь передать ссылку.

Вам потребуется сериализовать содержимое массива в строку в соответствии с ожидаемым сервером способом.