% perl-5.34.0 -MMath::GMP -wle 'local $SIG{FPE} = sub { die "divide by zero" };
  $z=Math::GMP->new(1); print $z / 0'
Maximal count of pending signals (120) exceeded at -e line 1.
divide by zero at -e line 1.
% 
% perl-5.34.0 -MMath::GMP -wle '$SIG{FPE} = sub { die "divide by zero" };
  $z=Math::GMP->new(1); print $z / 0'
Maximal count of pending signals (120) exceeded at -e line 1.
%