How does one raise an exception from a PL/Perl function? Specifically,this is a trigger function. Is it as simple as "die <msg>"?