$SIG{__DIE__} = sub { $! = 42; die @_ };