	: ץդäˤϡ


0. ñʥ塼ɽեȤˤȤޤ
   ץ̾ fmlsch  CGI Ǥ fmlsch.cgi Ǥ

1. INSTALL.sh  fmlsch դä뤳Ȥͤޤ

   a) INSTALL.sh ¤롣
	fml/bin/fmlsch  /usr/local/bin/fmlsch ˥󥹥ȡ뤹롣

	: /usr/local/bin ˥󥹥ȡ뤷ʤץǤ
	    a) βɬ

   b) /usr/local/libexec/fml  loader  fmlsch  ln -s 롣


   --- INSTALL.sh	2001/03/24 13:57:57	1.23
   +++ INSTALL.sh	2001/03/27 14:45:56
   @@ -83,7 +83,7 @@
    cp -pr fml/libexec/*	$libexec_dir/$fml_version/
    
    echo update /usr/local/bin/
   -for prog in fmldoc fmlticket fmlconf makefml
   +for prog in fmldoc fmlticket fmlconf makefml fmlsch
    do
    	echo update /usr/local/bin/$prog
    	cp fml/bin/$prog /usr/local/bin/$prog.new
   @@ -94,6 +94,7 @@
    PROGRAMS="$PROGRAMS fmlserv mead fmlconf fmldoc"
    PROGRAMS="$PROGRAMS fmlticket fmlticket.cgi"
    PROGRAMS="$PROGRAMS makefml makefml.cgi"
   +PROGRAMS="$PROGRAMS fmlsch fmlsch.cgi"


2. ⥸塼ޤ

   Ǥ fml/lib/TinyScheduler.pm 񤭤ޤ
   ޤɬפ¾˥饤֥꤬Ŭ͢Ƥ
    CPAN 

	HTML-CalendarMonthSimple-1.02.tar.gz

   ͢Ƥޤ
   Date-Calc ɬפʤΤŬ󥹥ȡ뤷Ƥ


3.  /usr/local/bin/fmlsch Υ⥸塼Ƥ֤褦ˤޤ

   a) ץμºݤΥɤ fml/lib/FML/Process/Scheduler.pm
      ˽档
      Ŭ١饹 FML::Process::Kernel Ȥޤ

   b) 鵯ư뤿 fml/lib/FML/Process/Switch.pm 
      ؤΥ롼ɲä롣

սѹ/ѰդƤ


3.1 FML::Process::Scheduler 

Ʊǥ쥯ȥΥץŬˤѤä hack ޤ :-)

ʤFML::Process::Scheduler ξ FML::Process::Scheduler::run() 
ѰդФޤǤ̤δؿ FML::Process::Kernel Υ᥽
ɤȤΤ饤


3.2 FML::Process::Switch ˥롼ɲä

ɲäΤ
	getopt() Υץ
	ML ̾ɬܤ
	ƤӽФ⥸塼̾
Ǥ
   
   --- Switch.pm	2001/03/25 04:09:00	1.14
   +++ Switch.pm	2001/03/27 15:27:00
   @@ -323,6 +323,9 @@
        elsif ($myname eq 'makefml.cgi') {
    	return qw(debug!);
        }
   +    elsif ($myname eq 'fmlsch') {
   +	return qw(debug!);
   +    }
        else {
    	croak "options for $myname are not defined.\n";
        }
   @@ -340,6 +343,9 @@
        if ($myname eq 'fmldoc') {
    	return 0;
        }
   +    elsif ($myname eq 'fmlsch') {
   +	return 0;
   +    }
        elsif ($myname eq 'makefml') {
    	return 0;
        }
   @@ -390,6 +396,12 @@
        }
        elsif ($name eq 'makefml.cgi') {
    	$pkg = 'FML::CGI::Configure';
   +    }
   +    elsif ($name eq 'fmlsch') {
   +	$pkg = 'FML::Process::Scheduler';
        }
        else {
    	return '';


4. fmlsch.cgi ξ


¤λϥ⥸塼뤬 FML::CGI:: 饹ˤʤʳ fmlsch ξ
ƱͤǤFML::CGI::Scheduler  FML::Process::CGI Υ֥饹Ǥ

̤ΤΤˤĤƤ FML::Process::CGI  FML::Process::Kernel 
ˤϤ餤ޤޤCGI.pm  FML::Process::CGI ȤHTTP
header ƤޤޤǤ¤νʤΤ
FML::CGI:: Υ⥸塼Ŭ HTML νϤ亴Ƥޤ 


$FML$
