"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
Thanks James,
Great little trick It worked!
Thanks for the help,
Russ
Russell Weiss
Founder and Technical Manager
InfoRelay Online Systems, Inc.
http://www.InfoRelay.net/
Try
bless $self, $class;
$main::SIG{'__DIE__'} = sub { $self-custom_die(@_) };
This will make sure
"James" == James G Smith [EMAIL PROTECTED] writes:
James "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;
James Try
James bless $self, $class;