#!/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>
何を入れると画面ににきれいにカレンダーが表示されるのでしょうか?
No.1
- 回答日時:
何度も同じ質問をされているようですが、HTMLファイルに変数名を書いても、そのまま表示するのは当たり前です。
長いだけで、何がしたいのかさっぱりわかりません。
どこからどこまでが何というファイル名で、どちらからどう呼ばれるのか明確にしてください。
この回答への補足
すみません。
やりたいことはcgiで打ったプログラムをインターネット上で年と月を入力してもらい表示ボタンを押すことによってその指定されたカレンダーを表示するというものなんです。
report.cgiというファイルとreport.htmlというファイルです。
http://www.******.*****.report.htmlというページに表示ボタンをつくることまではできたのですが。
そのcgiをhtmlにはきだすことがしたいのですが、伝わりましたでしょうか?
No.2ベストアンサー
- 回答日時:
まず、他の方々も言われていたと思いますが。
HTMLで動的な作業をすることはできません。
JavaScript等を使用すれば不可能ではありませんが
今回はCGIを使われていらっしゃるので、HTML上でCGIを使用することはできません。
拡張子を.cgiにし、CGI上で、HTMLを記述するのが最もよいと思います。
document.writeで、CGI拡張子のソースに、HTML記述をすることができます。
No.3
- 回答日時:
根本的にHTMLとCGIの関係をあらためて勉強された方がいいのではないでしょうか。
HTMLファイル内に動的に何かを表示させたい(今回であればカレンダー)のであれば、(perlということであれば)SSIを使うのが一般的でしょう。
また、SSIを使わないのであればperlのスクリプト内でHTMLを書き出してあげるしかないでしょう。
いずれにしても「カレンダーを表示させるスクリプト」や「何かを入力してその結果を表示させるようなスクリプト」をダウンロードして解析して感覚をつかむことをおすすめします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- CGI perlで書いたcgiでsqliteの使い方を教えてください 2 2023/05/08 21:29
- HTML・CSS テーブルタグのセルの幅の一部だけを指定 1 2023/03/12 12:02
- AJAX JavascriptからPHPへのAjax通信でnullが返ってくる 3 2022/08/03 22:00
- JavaScript EasyUIのSubGrid(jquery)におけるObjectに入れた連想配列について 1 2022/05/02 11:21
- Visual Basic(VBA) Selenium.ChromeDriverの使い方について 7 2022/09/22 06:43
- HTML・CSS 自身のHPにYouTube動画を貼り付けるのが出来なくなり困ってます 1 2022/11/11 10:44
- PHP htmlで複数の個数入力欄を表示させるには 1 2022/09/20 03:11
- その他(プログラミング・Web制作) python 気象データの取得 2 2023/06/20 23:54
- HTML・CSS 【CSS】:hasで可能? imgを含むtr要素を選択したい 1 2022/11/17 14:36
- MySQL SQL任意に並び替えをしたい 2 2023/08/28 10:47
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
HTMLでASPを動かしたい
-
月の第一週とは
-
6月の第2 第4火曜日は何日...
-
よくある 『 第○(1・2・3・4・...
-
VBAでExcelのヘッダーに文字列+...
-
毎○曜日って、使いますか?
-
燃えるゴミの日は何曜日ですか?
-
TCPヘッダのチェックサム算出方法
-
エクセルで毎月第2週日の水曜日...
-
FORMのFILEでフォルダ(ディレ...
-
バイナリファイルのアップロード
-
[Excel] ある日の曜日が当月の"...
-
曜日と曜の使い分けがわかりま...
-
エクセルで相対パスの書き方を...
-
[C#]ListView一覧表示時の幅設...
-
曜日を求めるプログラムはどう...
-
Content-type: text/htmlが表示...
-
CGIの中にinclude
-
Excelで第一〇曜日を求める方法...
-
perlのrequireの動き方について...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
DBを10件毎に表示ページング...
-
CGI RESCUEの簡易予約システムY...
-
ホームページにブログ記事をサ...
-
HTMLでASPを動かしたい
-
c# webBrowser 内のpdfファイル...
-
携帯端末の選別
-
Webページを作るには、HTMLとCS...
-
RSSファイルを取得して、現在の...
-
月の第一週とは
-
よくある 『 第○(1・2・3・4・...
-
エクセルで毎月第2週日の水曜日...
-
毎○曜日って、使いますか?
-
燃えるゴミの日は何曜日ですか?
-
週2回のペースって だいたい何...
-
apacheでPerl CGIが作動せず、5...
-
エクセルで相対パスの書き方を...
-
VBAでExcelのヘッダーに文字列+...
-
土曜日の26時って何曜日の何時...
-
[Excel] ある日の曜日が当月の"...
-
6月の第2 第4火曜日は何日...
おすすめ情報