If you don't need destructors or END blocks called, you can skip it altogether. Use POSIX:_exit($status). See perldoc -f exit for more.