Meh. How do you represent this structure in JSON?

my $a = [];
my $b = { a => $a };
push @$a, $b;
print to_json($a);  # ???
[download]

Real life needs you to be able to deal with structures like that. XML and JSON are both poor serialisations for real life data. YAML is somewhat better in this regard but has its own shortcomings.