Skip Menu |
 

This queue is for tickets about the Data-Difference CPAN distribution.

Report information
The Basics
Id: 75483
Status: new
Priority: 0/
Queue: Data-Difference

People
Owner: Nobody in particular
Requestors: MUIR [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: circular structure causes infinite recursion
A simple circular structure causes infinite recursion.
Subject: z2.pl
Download z2.pl
text/x-perl 260b
use Test::More tests => 1; use Data::Difference qw(data_diff); my $a = { x => [] }; push(@{$a->{x}}, $a->{x}); my $b = { x => [] }; push(@{$b->{x}}, $b->{x}); $SIG{ALRM} = sub { fail("timeout"); exit }; alarm(5); my @r = data_diff($a,$b); pass("done");


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.