Re: undef Package;

[Anarion]

Perhaps you look for something like reset

 "package::"

$anarion=\$anarion;

s==q^QBY_^=,$_^=$[x7,print

[Juerd]

Perhaps you look for something like reset

reset deletes symbols starting with a specific letter. tr-like ranges can be used.

reset $foo is similar (but not at all equal) to

for (grep /^[$foo]/, keys %::) {
    undef @$_;
    undef %$_;
    undef $$_;
}

I want subs to be destroyed as well.

U28geW91IGNhbiBhbGwgcm90MTMgY
W5kIHBhY2soKS4gQnV0IGRvIHlvdS
ByZWNvZ25pc2UgQmFzZTY0IHdoZW4
geW91IHNlZSBpdD8gIC0tIEp1ZXJk