How would you trap error occurred in the perl program/file?
Answers were Sorted based on User's Feedback
Answer / prabhath kota
You can catch the errros by using eval function.
Keep your code in eval block some thing like shown below.
Eg.,
#################################
eval {
my $a = 0;
my $b = $a/0; #Dividing 0 with 0 is definitely an error
};
if ($@) {
print "\n Error in your code";
}
############################
-> Eval block always ends with a semi-colon. $@ will catch
the errors persent.
-> If any errors are present $@ will be set otherwise $@
will not be set
-> Unfortunately in Perl we don't have Explicit Error
handling techniques like some other languages like java etc
I mean like IOException etc.,
Is This Answer Correct ? | 5 Yes | 3 No |
Answer / shah faisal
#Ist trapping the error in a block
eval {
# perl code goes here
};
if ($@) { # $@ is a special variable containing the error
if any else blank
print "Print your own error If u want";
}
# 2nd
# use if or unless for a loop ;ike below
if(chk some condition)
{
die"$!\n"; # if the condition success
}
system generated error is printed and the scirpt is exited
}
Is This Answer Correct ? | 0 Yes | 0 No |
Answer / perly_whirly
Put your code inside of an eval. If an error occurs, the $@ variable will contain
the error. You can also raise an error by using die inside of an eval.
Is This Answer Correct ? | 1 Yes | 3 No |
How do I read command-line arguments with Perl?
What elements of the Perl language could you use to structure your code to allow for maximum re-use and maximum readability?
write a script to display mirror image of a entered value and also check whether Palindrome
Assuming both a local($var) and a my($var) exist, what's the difference between ${var} and ${"var"}?
What is the use of strict?
Perl regular expressions are greedy" what does this mean?
What is goto statement in perl?
Why to use perl?
What does undef function in perl?
Write a script for 'count the no.of digits using regular expressions in perl..
What are the options that can be used to avoid logic errors in perl?
Explain the functioning of conditional structures in perl.