アプリ版:「スタンプのみでお礼する」機能のリリースについて

#!/urs/bin/local/perl
use CGI qw(:standard);
use Date::Calc qw(:all);
$year = param('year');
$mon = param('mon');
if ($year or $mon){
#年、月がないとエラー
if (!$year){
&error(100,'年、月を入力して下さい。');
}elsif(!$mon){
&error(110,'年、月を入力して下さい。');
}
#年は1以上、月は、1~12の範囲
#紀元前は計算しない
if($year < 1){
&error(120,'年に誤りがあります。');
}
if($mon < 1 or $mon > 12){
&error(130,'月に誤りがあります。');
}
#カレンダーの計算
$cline = Calendar($year,$mon);
#先頭行と最終行をとる
$cline =~ s/^\n//;
$cline =~ s/\n$//;
#改行区切りで分割
@Cal = split(/\n/,$cline);
#まず、年、月をテーブルに入れる
$CAL.=<<"EOL";
<table border="1">
<tr>
<td colspan="7" align="center">$year年$mon月</td>
</tr>
EOL
#曜日をテーブルに入れる
$CAL.=<<"EOL";
<tr>
<td>日</td>
<td>月</td>
<td>火</td>
<td>水</td>
<td>木</td>
<td>金</td>
<td>土</td>
</tr>
EOL
#日付をテーブルに入れる
for($i=2; $i<=$#Cal; $i++){
$CAL.= <<"EOL";
<tr>
EOL
$shift=3; #1日に3文字文使う
$s = 0;
for ($j=0; $j<7; $j++){
$day = substr($Cal[$i], $s, $shift);
if($day !~ /\d/){
$day = ''; #数字がなければスペース
}else{
$day =~ s/ //g; #余分なスペースをとる
}

$CAL.=<<"EOL";
<td align="right">$day</td>
EOL
$s += $shift #3文字を右へ
$s += 1; #2回目からは、区切り文字も計算
}
$CAL.=<<"EOL";
</tr>
EOL
}
$CAL.=<<"EOL";
</table>
EOL
}
print <<"EOL";
Content-type: txet/html

というプログラムを作ってカレンダーを表示させたいのですが、
HTMLで打つときに
<html>
<head>
<title>カレンダー</title>
</head>
<body>

<from action="report.cgi">
年:<input type="text" size="4" name="year">
月:<input type="text" size="2" name="mon">
<br>
<input type="submit" value="表示">
</from>
<br><br>
$CAL(と入れたのですが、画面に%CALと出るだけでカレンダーが表示されません)
</body>
</html>

何を入れると画面ににきれいにカレンダーが表示されるのでしょうか?

A 回答 (3件)

何度も同じ質問をされているようですが、HTMLファイルに変数名を書いても、そのまま表示するのは当たり前です。



長いだけで、何がしたいのかさっぱりわかりません。

どこからどこまでが何というファイル名で、どちらからどう呼ばれるのか明確にしてください。

この回答への補足

すみません。
やりたいことはcgiで打ったプログラムをインターネット上で年と月を入力してもらい表示ボタンを押すことによってその指定されたカレンダーを表示するというものなんです。
report.cgiというファイルとreport.htmlというファイルです。
http://www.******.*****.report.htmlというページに表示ボタンをつくることまではできたのですが。
そのcgiをhtmlにはきだすことがしたいのですが、伝わりましたでしょうか?

補足日時:2007/06/09 02:02
    • good
    • 0

まず、他の方々も言われていたと思いますが。


HTMLで動的な作業をすることはできません。
JavaScript等を使用すれば不可能ではありませんが
今回はCGIを使われていらっしゃるので、HTML上でCGIを使用することはできません。

拡張子を.cgiにし、CGI上で、HTMLを記述するのが最もよいと思います。
document.writeで、CGI拡張子のソースに、HTML記述をすることができます。
    • good
    • 0

根本的にHTMLとCGIの関係をあらためて勉強された方がいいのではないでしょうか。



HTMLファイル内に動的に何かを表示させたい(今回であればカレンダー)のであれば、(perlということであれば)SSIを使うのが一般的でしょう。

また、SSIを使わないのであればperlのスクリプト内でHTMLを書き出してあげるしかないでしょう。

いずれにしても「カレンダーを表示させるスクリプト」や「何かを入力してその結果を表示させるようなスクリプト」をダウンロードして解析して感覚をつかむことをおすすめします。
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!