2014-02-12T01:11:58 lichtkindIch will sicher gehen ob ein Objekt zerstört wurde. Solange ich referenz dazu habe kann ich lange warten aber wenn ich mir string der referenz merke kann ich den doch später benutzen irgendwie in der nametable nachzuschaun under *{SCALAR} oder so also ich hab den string einer referenz und will nachschaun ob die referenz immer noch im ram aktiv ist.
1 2 3 4 5 6 7 8 9 10 11 12
our $a; for (1..10) { $a = Foo->new(); say $a; } package Foo; sub new { bless {}, shift; }
1
2
3
4
5
6
7
8
9
10
Foo=HASH(0x3c720c0) <--
Foo=HASH(0x3dfa040)
Foo=HASH(0x3dfc920)
Foo=HASH(0x3c720c0) <--
Foo=HASH(0x3dfa040)
Foo=HASH(0x3dfc920)
Foo=HASH(0x3c720c0) <--
Foo=HASH(0x3dfa040)
Foo=HASH(0x3dfc920)
Foo=HASH(0x3c720c0) <--