Is it possible - in Perl - to access the name of the current package (for example, to print it in a customized error report) ?

Edit
Report