Re: die properly

eval {
    &feed;
}; if ( $@ ) {
    &email_error;
}
[download]

In general, if you think something isn't in Perl, try it out, because it usually is. :-)
"What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against?"

Comment on Re: die properly Download Code

Replies are listed 'Best First'.
Re^2: die properly by Anonymous Monk on May 12, 2005 at 18:28 UTC
I could use your code right after the sub &feed or inside the subroutine?	[reply]
Re^3: die properly by dragonchild (Archbishop) on May 12, 2005 at 18:30 UTC
`&feed;` is the call to the subroutine. You wrap the call in an eval-block and check $@ to see if the subroutine died or not. In general, if you think something isn't in Perl, try it out, because it usually is. :-) "What is the sound of Perl? Is it not the sound of a wall that people have stopped banging their heads against?"	[reply] [d/l]
Re^4: die properly by Anonymous Monk on May 12, 2005 at 18:42 UTC
Ok, that's how I did `eval { &feed; }; unless ( $@ ) { &error; } sub feed { ...code... while($l < $2) { ...code... } die "Could not retreive data"; }` [download] And it seems to be working.	[reply] [d/l]
Re^5: die properly by tlm (Prior) on May 12, 2005 at 20:39 UTC
Re^6: die properly by Anonymous Monk on May 13, 2005 at 12:23 UTC