NAME FML::Process::Debug - debug tool / tiny FML::Process emulator. SYNOPSIS if ($0 eq __FILE__) { my $domain = "nuinui.net"; my $prefix = "/tmp/nuinui.net"; my $map = "/etc/fml/ml_home_prefix"; use FML::Process::Debug; my $curproc = new FML::Process::Debug; $curproc->{ config } = { fml_primary_ml_home_prefix_map => $map }; # special debug flag on $debug = 101; $| = 1; my $ml_home_prefix = new FML::ML::HomePrefix $curproc; print "\n# add { $domain => $prefix }\n"; $ml_home_prefix->add($domain, $prefix); system "cat $map"; print "\n# delete { $domain => $prefix }\n"; $ml_home_prefix->delete($domain); system "cat $map"; } DESCRIPTION FML::Process::Debug provides tiny FML::Process::XXX process emulator for debug use. It also provides dump_curproc() method to dump out $curproc structure as string for documentation. METHODS new() constructor. TOOLS for debug simplified version of FML::Process::* only used for debug. mkdir($dir, $mode) create directory $dir if needed. log($msg, $msg_args) log message. logwarn($msg, $msg_args) log message at level as warning. logerror($msg, $msg_args) log message at level as critical error. logdebug($msg, $msg_args) log message at level as debug. ml_home_prefix($domain) search ml_home_prefi in /etc/fml/ml_home_prefix and return the prefix. config() return config object. incoming_message() return undef since this method is a dummy. dump_curproc($curproc) dump the curproc structure. CODING STYLE See "http://www.fml.org/software/FNF/" on fml coding style guide. AUTHOR Ken'ichi Fukamachi COPYRIGHT Copyright (C) 2003,2004,2006 Ken'ichi Fukamachi All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. HISTORY FML::Process::Debug appeared in fml8 mailing list driver package. See "http://www.fml.org/" for more details.