Re^4: Take reference and then dereference die() and warn()

Replies are listed 'Best First'.
Re^5: Take reference and then dereference die() and warn() by Laurent_R (Canon) on Nov 09, 2013 at 10:27 UTC
OK, I understand your motivations, now. You still have numerous simpler ways to do it, such as storing your long error message in a variable (you actually had a $error variable in your original post) or doing something like this: `$ perl -e 'use diagnostics; $die_on_err=shift; 0 or print "error messa +ge" and ($die_on_err? die $! : warn "\n" ) ' 0 error message` [download] or, yet simpler, using a subroutine such as the one proposed by Jenda in this post: Re: Take reference and then dereference die() and warn().	[reply] [d/l]

Replies are listed 'Best First'.

Re^5: Take reference and then dereference die() and warn()
by Laurent_R (Canon) on Nov 09, 2013 at 10:27 UTC

OK, I understand your motivations, now.

You still have numerous simpler ways to do it, such as storing your long error message in a variable (you actually had a $error variable in your original post) or doing something like this:

$ perl -e 'use diagnostics; $die_on_err=shift; 0 or print "error messa
+ge" and ($die_on_err? die $! : warn "\n" ) ' 0

error message
[download]

Jenda

Re: Take reference and then dereference die() and warn()

[reply]
[d/l]