/usr/share/doc/mhonarc/examples/mhasiteinit.pl is in mhonarc 2.6.19-2.
This file is owned by root:root, with mode 0o644.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 | ##---------------------------------------------------------------------------##
## File:
## $Id: mhasiteinit.pl,v 1.6 2011/01/03 06:42:39 ehood Exp $
## Description:
## Site-specific initialization code for MHonArc. If used, it
## should be place in the MHonArc library directory as specified
## during initialization, or in a directory that perl checks
## when requiring libraries.
##
## >>> THE EXPRESSIONS IN THIS FILE ARE EXECUTED EVERYTIME AN
## >>> ARCHIVE IS OPENED FOR PROCESSING.
##
## Note, it is recommended to use a default resource file when
## possible.
##---------------------------------------------------------------------------##
## Set package to something other than "mhonarc" to protect ourselves
## from unintentionally screwing with MHonArc's internals
package mhonarc_site_init;
##---------------------------------------------------------------------------
## Uncomment the following to set the default LOCKMETHOD to flock.
## Flock is better than the directory file method if flock() is supported
## by your system. If using NFS mounted filesystems, make sure flock()
## under Perl works reliable over NFS. See the LOCKMETHOD resource
## page of the documentation for more information.
#&mhonarc::set_lock_mode(&mhonarc::MHA_LOCK_MODE_FLOCK);
##---------------------------------------------------------------------------
## The following are callback functions that you can register
## for all instances of mhonarc. See the Application Programming
## Interface appendix of the documentation for a complete list
## of available callbacks and how they are invoked.
#require 'head_routine.pl'; # make sure source of routine is loaded
#$mhonarc::CBMessageHeadRead = \&your_head_routine_name;
#require 'raw_body_routine.pl'; # make sure source of routine is loaded
#$mhonarc::CBRawMessageBodyRead = \&your_raw_body_routine_name;
#require 'body_routine.pl'; # make sure source of routine is loaded
#$mhonarc::CBMessageBodyRead = \&your_body_routine_name;
##---------------------------------------------------------------------------##
## Make sure to return a true value for require().
##---------------------------------------------------------------------------##
1;
|