"Russell D. Weiss" <[EMAIL PROTECTED]> wrote:
>
>So, onto the problem.  Within the constructor for the wrapper object, I want
>to do:
> bless $self, $class;
> $main::SIG{'__DIE__'} = $self->custom_die;

Try

  bless $self, $class;
  $main::SIG{'__DIE__'} = sub { $self->custom_die(@_) };

This will make sure $self is the first argument to custom_die, it
will be the same $self as when the signal handler was called, and
the signal handling mechanism won't have to know about it.
------------------------------------+-----------------------------------------
James Smith - [EMAIL PROTECTED] | http://www.jamesmith.com/
            [EMAIL PROTECTED] | http://sourcegarden.org/
              [EMAIL PROTECTED]      | http://cis.tamu.edu/systems/opensystems/
------------------------------------+------------------------------------------

Reply via email to