On Mon, 14 Jul 2008 20:59:34 +0100 David Cantrell <[EMAIL PROTECTED]> wrote:
> Can't you use Devel::Peek to get the refcount? I use B: use B qw( svref_2object ); my $SV = svref_2object($ref); my $refcount = $SV->REFCNT; -- Paul "LeoNerd" Evans [EMAIL PROTECTED] ICQ# 4135350 | Registered Linux# 179460 http://www.leonerd.org.uk/
signature.asc
Description: PGP signature