[PREVIOUS CHAPTER] [NEXT CHAPTER]
1 HOOKS overview


HOOK is "execute a small perl program" within fml. 


2.1 Header Operation

GET_HEADER_FIELD_VALUE( header_field )


GET_ORIGINAL_HEADER_FIELD_VALUE( header_field )


SET_HEADER_FIELD_VALUE( header_field , value )


2.2	%Envelope Operation

GET_ENVELOPE_VALUE( hash_key )


SET_ENVELOPE_VALUE( hash_key, value )


ENVELOPE_APPEND( hash_key, value )


ENVELOPE_PREPEND( hash_key, value )


2.3	Read Files

GET_BUFFER_FROM_FILE( file )


	$s = &GET_BUFFER_FROM_FILE( "$DIR/xxx" );


2.4	Example


$START_HOOK = q#
	my ($s) = &GET_BUFFER_FROM_FILE("$DIR/info");
	&ENVELOPE_APPEND('Body', &STR2JIS($s));
#;


Please write message in $DIR/info (for example,
/var/spool/ml/elena/info ).

[PREVIOUS CHAPTER] [NEXT CHAPTER]