In Perl, we sometimes catch die() using eval as an exception handling and use the string given as the parameter of die() in it, like in the example below.<\/p>\n
$ vim die_test<\/pre>\n#!\/usr\/bin\/perl\r\n\r\neval {\r\n die \"Exception occurred\";\r\n};\r\nif ($@) {\r\n print $@;\r\n}<\/pre>\nThis script will display the below output on console.<\/p>\n
$ .\/die_test\r\nException occurred at die_test line 4.<\/pre>\nThis output is fine as long as you use it for error message. But, if you want to use the string for other process, “at die_test line 4” would be an obstacle. To exclude the line number, you can simply add line break (\\n) at the end of the string.<\/p>\n
#!\/usr\/bin\/perl\r\n\r\neval {\r\n die \"Exception occurred\\n\";\r\n};\r\nif ($@) {\r\n print $@;\r\n}<\/pre>\n$ .\/die_test\r\nException occurred<\/pre>\n","protected":false},"excerpt":{"rendered":"