[Israel.pm] How to debug Attempt to free unreferenced scalar: SV0x23e24ec messages ?

[Shmuel Fomberg]

Hi Roey.

A brief question: does you script uses threads?

Shmuel.


>-----Original Message-----
>From: Roey Almog
>Sent: Wednesday, March 19, 2008 3:08 PM
>
>Hi,
>We have a long running script that starts producing the following
>errors after a while:
>Attempt to free unreferenced scalar: SV 0x23e24ec, Perl interpreter:
>0x6d73bc at /<C:\\projects\\4\\main_search.pl>inc_search_maint.pm line
>216.
>The code sorounding looks like this:
>
>$self->{DataSource}->{position_id}->SetValue($self->{position_id}-
>>GetValue());
>if ( CCDLookUp("COUNT(*)",
>                       "search",
>                        "position_id=" . $self->{DataSource}->ToSQL(
>                            $self->{DataSource}->{position_id}-
>>GetDBValue(),
>
>$self->{DataSource}->{position_id}->{DataType}) . $Where,
>                            $self->{DataSource}) > 0)
>{
>      $self->{position_id}->{Errors}->addError($CCSLocales->GetText
>                       ('CCS_UniqueValue',
>                        $self->{position_id}->{Caption}));
>}
>$Validation = ( $self->{search_in_all_cvs}->Validate() && $Validation
>) ? 1 : 0; # Line 216
>$Validation = ( $self->{search_in_position}->Validate() && $Validation
>) ? 1 : 0;
>
>Only the CCDLookUp ends up with calling binary module (DBD::InterBase)
>
>How can I debug this to see which variable has a problem (it seems
>line 216 does not tries to destroy a scalar) ?
>
>The program itself seems to run ok although the reported error
>
>Thanks
>
>Roey
>
>I works with ActivePerl 5.8.8 build 817
>_______________________________________________
>Perl mailing list
>Perl at perl.org.il
>http://perl.org.il/mailman/listinfo/perl
>
>
>--
>No virus found in this incoming message.
>Checked by AVG.
>Version: 7.5.519 / Virus Database: 269.21.8/1338 - Release Date: 21/03/2008
>17:52