#testcarp.pm package TestCarp; use strict; use Logger('logMessage','wipeLog'); use base 'Exporter'; our @EXPORT_OK = ('test_carp'); sub test_carp { wipeLog(); logMessage("testing"); logMessage( Carp::cluck("Cluck at ")); } 1;