The carp Function in Perl

The carp function in Perl is the basic equivalent of warn and prints the message to STDERR without actually exiting the script and printing the script name.

package T;
require Exporter;
@ISA = qw/Exporter/;
@EXPORT = qw/function/;
use Carp;
sub function {
   carp "Error in module!";
}
1;

When called from a script like below −

use T;
function();

It will produce the following result −

Error in module! at test.pl line 4