W
Size: a a a
W
VG
AT
VG
W
VG
W
AT
VG
AT
VG
VG
VG
AT
W
while (1) {
my $a = {b => {}};
$a->{b}{a} = $a;
}
Как
пофиксить? (while - только для того чтобы показать что оно течет. Считается что мы потом будем пользоваться $a и когда она умрет, она должна отпустить память)AT
AT
VG
W
W