NAME

Tie::InSecureHash

DESCRIPTION

Tie::InSecureHash - A tied hash that is API compatible with Tie::SecureHash with namespace-based encapsulation features disabled. This is for debugging. Typically you'll use this in the following manner:

#!/usr/bin/env perl
use warnings;
use strict;
BEGIN {
    if ($ENV{STUPID_AND_DANGEROUS}) {
        use lib 't/naughty_lib';
    }
}
use Tie::SecureHash;

Then in t/naughty_lib:

package Tie::SecureHash;
use base Tie::InSecureHash;
1;

Now you can use things like Devel::Cycle (temporarily) in your code ...

VERSION

This code derived form v1.03 of Tie::SecureHash released in 1999.

ACCESS RESTRICTIONS ON ENTRIES

There are none. This code is for debugging only :P

AUTHOR

Damian Conway (damian@cs.monash.edu.au)

Swathes of code deletions by Kieren Diment <zarquon@cpan.org> with help from Glenn Fowler (CEBJYRE).

BUGS AND IRRITATIONS

None here :P

COPYRIGHT

  Copyright (c) 1998-2000, Damian Conway. All Rights Reserved.
This module is free software. It may be used, redistributed
and/or modified under the terms of the Perl Artistic License
     (see http://www.perl.com/perl/misc/Artistic.html)