@param seems to be shared between Execute calls

[Michael Stevens]

Hi.

We're seeing an odd bug where @param seems to be shared between Execute 
calls in the same process. The following code is a test case for this:

#!/usr/bin/perl -w

use strict;
use Embperl;

my $output1;

my $input = '[- $param[0]->{hello} = 42; -]';

Embperl::Execute({
        inputfile => "blah",
        input => \$input,
        output => \$output1,
        });

my $output2;
my $input2 = '[- use Data::Dumper; print Dumper(\...@param); -]';

Embperl::Execute({
                inputfile => "blah",
                input => \$input2,
                output => \$output2
        });

Which on my machine outputs:

$VAR1 = [
          {
            'hello' => 42
          }
        ];

Surely this shouldn't happen?

--
Michael Stevens
Dianomi Ltd
18 Buckingham Gate
London SW1E 6LB

Tel: 020 7802 5530
Fax: 020 7630 7356
www.dianomi.com

The information in this message and any attachment is intended for the 
addressee and is confidential and may be subject to legal privilege. 
Dianomi Ltd, Registered Office: One America Square, Crosswall, London. 
EC3N 2SG. Registered in England and Wales with Company Registration 
Number 4513809. VAT registration number: 809754988

---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscr...@perl.apache.org
For additional commands, e-mail: embperl-h...@perl.apache.org