Help for this page

Select Code to Download

Select or download this

sub wexit (;$) {
  my $status = shift;
...
}

*CORE::GLOBAL::exit = \&wexit;