Do you use an exception class in your Perl programs? Why or why not?

by

I don’t use exception objects very often; mostly because a string is usually enough and involves less work. This is because there is usually nothing the program can do about the exception. If it could have avoided the exception, it wouldn’t have caused it in the first place.

If you can do something about the exceptions, use objects. If you are just going to kill the program (or some subset, say, a web request), save yourself the effort of coming up with an elaborate hierarchy of objects that do nothing more than contain a message.

As for number 4; $SIG{__DIE__} should never be used. It doesn’t compose; if one module expects sigdie to work in one way, and another module is loaded that makes it work some other way, those modules can’t be used in the same program anymore. So don’t do that.

If you want to use objects, just do the very-boring die Object->new( ... ). It may not be exciting as some super-awesome magic somewhere, but it always works and the code does exactly what it says.

More Related Contents:

  1. What’s broken about exceptions in Perl?
  2. Is object oriented exception handling in Perl worth it?
  3. I want to read a file from a directory folder [duplicate]
  4. How can I match values in one file to ranges from another?
  5. Perl: Compare 2 hash table values
  6. Failing to install MIME::Base64 using cpan [closed]
  7. Declaring a 2D coordinate in Perl / C / C++ [closed]
  8. Why can’t Perl find my file that is in ClearCase?
  9. Difference of Two Arrays Using Perl
  10. How can I output UTF-8 from Perl?
  11. What’s the difference between a hash and hash reference in Perl?
  12. Multiline search replace with Perl
  13. How do I “use” a Perl module in a directory not in @INC?
  14. How can I process options using Perl in -n or -p mode?
  15. How can I dynamically include Perl modules without using eval?
  16. How can I compile my Perl script so it can be executed on systems without ‘perl’ installed?
  17. What is the difference between my and local in Perl?
  18. How can I guess the encoding of a string in Perl?
  19. Why does my Perl script exit with 137?
  20. Perl read line by line
  21. Using output from a previous job in a new one in a GitHub Action
  22. How can I install a specific version of a set of Perl modules?
  23. What does !! (double exclamation point) mean?
  24. Using my with parentheses and only one variable
  25. How do I extract the domain out of an URL?
  26. In Perl, what is the difference between accessing an array element using @a[$i] as opposed to using $a[$i]?
  27. Why does $foo->{bar} autovivify but %$foo doesn’t?
  28. What does shift() do in Perl?
  29. How can I extract text from a PDF file in Perl?
  30. How do I retrieve the terminal width in Perl?

Leave a Comment