I am using the
FreezeThaw
module
to send serialized objects from a client to a server. It is working fine for array references with a limited number of entries, but when I do the same for a bigger array of blessed objects the server is stopping with
Segmentation fault (core dumped)
Below is what I am using
Client:
my $message = freeze $_[1]; # encode_json
$mq->publish($channel_id, $routing_key, $message);
Server:
my $message = $payload->{body} ;
my @got = thaw $message;
print Dumper(@got);
When I use the below array reference it reaches the server, but immediately after it prints, the server stops with a segmentation fault error.
$VAR1 = [
[
bless( {
'oidptr' => bless( do{\(my $o = '140488241049968')}, 'netsnmp_oidPtr' )
}, 'NetSNMP::OID' ),
'600',
67
],
... approximately 200 lines repeated