[Expectperl-discuss] couldn't exit with status code from Expect ?

[Olivier A. <Oli...@if...>]

Hi,
    I'm new to the list. Thank's to developper's who maintain Expect!

I'm trying to exit perl whith an exit code after doing some expect 
stuff, but the exit code is always set to 1. What I'm doing wrong ?
here is my test code:
#!/usr/bin/perl -w
use strict;
use Expect;

my $exp=Expect->spawn("csh") or die "error: $!";
print $exp "exit 3";
exit 3;


%./test.pl
%echo ?$
1
%

Thank's for help!
I'm using Expect 1.15 with perl 5.6.0 on both solaris and linux platform.

--
Olivier