> Hello beginners@perl.org,
> 
> it is possible to setup somewhere, I want my script dies, if 
> warning occurs.

BEGIN {
        $SIG{__WARN__} = sub{ print STDERR @_; exit 1};
}

warn "I am going to die\n";

I hope you are looking for something like this.

--Ankur  



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>


Reply via email to