How to capture error message using oraperl ?

Original text of this message