paul@paul-laptop:~$ perl foo
SubRef ok 135976352
SubRef ok 135976436
DESTROY ArrayRef
DESTROY SubRef
DESTROY SubRef
SubRef ok 135976352
SubRef ok 135976424
DESTROY ArrayRef
DESTROY SubRef
DESTROY SubRef
After For
END
DESTROY CircularRef
DESTROY CircularRef