Re: [perl-win32-gui-hackers] Global destruction error and UserData problem

[Robert M. <rm...@po...>]

Glenn W Munroe wrote:
> I've been working on an old project and am seeing an old problem and a new
> one. The old problem is the:
> 
> "(in cleanup) Can't call method "FETCH" on an undefined value..."
> 
> message on program exit. Rob thought he had this one pinned down, but it
> seems there's still a problem somewhere.

You say later that you're using v1.05.  The fix for this isn't in 1.05, 
it's only in CVS.

> The new problem is with the new UserData method. I tried saving a hash
> reference, but am getting this error:
> 
> Can't use string ("1") as a HASH ref while "strict refs" in use...
> 
> on use of the expression
> 
> $mw->tbTab->UserData()->{key}

Can you split this into 2:
   my $somescalar = $mw->tbTab->UserData();
   my $value = $hashref->{key};

and have a look at what $somescalar has in it - the error suggests that 
you're not getting a hashref back from the user data, and if not, then 
we'll need to have a look at where you set it ...

> I also saw the message:
> 
> "userData ref count not 1 during destruction - please report this..."

If you can reproduce this, I'd like to hear about it, as there shouldn't 
be any way this can happen!

> I am using version 1.05 of the module. I know the next request will be to
> provide a minimal example demonstrating the problems, but this program is a
> labour of love and is almost 4000 lines long! I can work around both
> problems and am only reporting them for the record as it was requested. Then
> again, I don't mind sending a copy of the program if anybody wants to look
> into it.

Let's see if we can get there without having to share 4000 lines of code :-)

Thanks for taking the time to report these problems.

Regards,
Rob.