[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-win32-users
Subject:    RE: Attempt to free unreferenced scalar
From:       Lee Goddard <LGoddard () VHN ! NET>
Date:       2000-09-29 9:03:32
[Download RAW message or body]

From: Carl Jolley [mailto:cjolley@iac.net]
> On Thu, 28 Sep 2000, Lee Goddard wrote:
> 
> > If anyone is interested, I've got more goodies on this:
> > 
> > foreach (grep /$part/,(keys %dtd_elems)) {
> >  	# ...
> > }
> > 
> > Changing the syntax of the call to grep
> > doesn't help:
> > 
> > foreach (grep {/$part/}  (keys %dtd_elems)){
> > 
> > But this avoids the error:
> > 
> > foreach (grep "/$part/", (keys %dtd_elems)){
> > 
> > And I think, not sure, it does the same thing,
> > as the manual says.
> > 
> > Is it me?  Quite possibly, I think.
> 
> One question, does the variable $part include any regex 
> meta-characters,
> a slash or a trailing new line chatracter, etc?

Er, yes.  Thought that a message went to the list
detailing that, but realise now that I forgot
to CC.  So, thanks, sorry, you were right:
/\Q$part\E/.   Guess the unref'd scalar was in
the regex....

THanks again,
lee
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-users

[prev in list] [next in list] [prev in thread] [next in thread]