in reply to 'Restricted' data, an additional security mechanism for Perl.
A quick brainstorm: A Tie::Scalar::SelfDestruct module. After FETCH is called a given number of times (default 1, but can be changed via a param passed to tie), the data inside is undefed. Of course, you have to be careful that you call FETCH only that number of times. Any more, and you'll just get undef back. Any less, and you were better off not using it at all (though a quick while($tied_scalar) { 0 } would take care of that if you had to). The usual problems with tie apply, of course.
----
: () { :|:& };:
Note: All code is untested, unless otherwise stated
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: 'Restricted' data, an additional security mechanism for Perl.
by Abigail-II (Bishop) on Feb 09, 2004 at 14:35 UTC | |
by exussum0 (Vicar) on Feb 09, 2004 at 18:34 UTC | |
by Abigail-II (Bishop) on Feb 09, 2004 at 21:27 UTC | |
by exussum0 (Vicar) on Feb 09, 2004 at 21:53 UTC | |
by hardburn (Abbot) on Feb 09, 2004 at 22:13 UTC | |
|