Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer

Re: "cleaning out" object data

by pelagic (Priest)
on May 20, 2005 at 07:36 UTC ( #458867=note: print w/replies, xml ) Need Help??

in reply to "cleaning out" object data

How about:
my $self = shift; $self = ();


Replies are listed 'Best First'.
Re^2: "cleaning out" object data
by Forsaken (Friar) on May 20, 2005 at 07:41 UTC
    That was also my first thought, but that:
    - destroys the object if it isn't referenced elsewhere, or
    - does absolutely nothing if it is still referenced elsewhere.

    Basically, as it turns out, all that does is take the variable $self that previously contained a reference to a blessed object, and gives it a new value, a reference to a newly created anonymous hash. So unless $self was the only reference to the object(which it isn't in my specific case) absolutely nothing happens :-)

    edit: formatting

    Remember rule one...

      Yes, of course, you're absolutely right. So I'm afraid your somewhat unelegant solution is the best we can get.

Re^2: "cleaning out" object data
by polettix (Vicar) on May 20, 2005 at 09:52 UTC
    To obtain the requested effect you'd use rev_1318's solution below, i.e. assigning to %$self and not to $self. Typo?

    Flavio (perl -e 'print(scalar(reverse("\nti.xittelop\@oivalf")))')

    Don't fool yourself.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://458867]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (5)
As of 2021-09-16 17:54 GMT
Find Nodes?
    Voting Booth?

    No recent polls found