＜と、でます。
cgiのパーミッションは755．文字コードは合わせてください。
SSIが.htaccessで使えるサーバーの場合.htaccess内に次の2行を書く
Options +Includes AddType text/x-server-parsed-html .html
cntdn.cgiを貼り付ける場合SSI方式
<html> <body> <!--#exec cgi="cntdn.cgi"--> </body> </html>
cntdn.cgiの中身
cntdn.txt
#!/usr/bin/perl # CountDown # ver.0.1 # generated by femc.org $cyear = "2005";#年 $cmon = "10"; #月 $cday = "30"; #日 $befor = "あと%s日"; #その日までメッセージ $now = "あと%s日！当日です"; #当日のメッセージ $after = "もう%s日過ぎてます"; #過ぎた後のメッセージ use Time::Local; ($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);#時刻 $src = timelocal(0, 0, 0, $mday, $mon , $year + 1900); $dst = timelocal(0, 0, 0, $cday , $cmon - 1, $cyear); $exp = ($dst - $src) / 86400; print "Content-type: text/html\n\n"; #print "$cyear年$cmon月$cday日まで\n"; if($exp > 0) { printf($befor,$exp); }elsif($exp < 0) { $exp = abs $exp; printf($after,$exp); }elsif($exp == 0) { print $now; };
※perlのTime::Localモジュールを使用しているので使用できない場合もあり。