CGI-BBS > CGI > Perl > Perlの設置で携帯電話を自動ジャンプしたい。(年と月の取得で)


カレッヂ
カレッヂ


質問者 たかし  投稿日 2005/7/2(土) 02:21:10
日記のサービスを使っているのですが、
そのサービスを、アクセス時に現在の年月の表示にしたいのです。
解決方法としては、年月を埋め込んだリンクを使用するしかないのですが、
毎月リンクを変更するのは面倒ですので、CGIで何とかならないかと考えました。
実は、すでにPC用のCGIは自力で作成し、機能しているのですが、
携帯ではそれが動作せず、試行錯誤してみたものの上手くいかず参っています。
参考までに、PC用のものを貼り付けます。

--------------------------------------------------
#!/usr/bin/perl

print "Content-type: text/html\n\n";
print "<HTML>";
print "<HEAD>";
print "<TITLE></TITLE>";
print "</HEAD>";
print "<BODY>\n";
$ENV{'TZ'} = "JST-9";
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$years=$year+1900;
$mons =$mon+1;
print qq(<META http-equiv="refresh" content="0;url='http://www.th21.jp/adiary/diary1.cgi?id=spherebr&action=view&year=$years&month=$mons&all=yes'">);
print "</BODY>";
print "</HTML>\n";

exit;
--------------------------------------------------

このようなものです。
説明が下手でご理解頂けたか不安ですが、
なんとか上記の様な機能を、携帯でも実現したいのです。
知識がない私にはもう限界です。よろしくお願いいたします。

【習熟度】多少の設置経験

回答者 sim  [削除]  投稿日 2005/7/2(土) 11:05:33
#!/usr/bin/perl

print "Location: http://www.th21.jp/adiary/diary1.cgi?id=spherebr&action=view&year=$years&month=$mons&all=yes\n\n";
exit;


こうしてしまってはいかがでしょうか。
質問者 たかし  [削除]  投稿日 2005/7/2(土) 12:37:20
返答ありがとうございます!
私の説明が不十分だったため、分かりにくいのだと思いますが、

http://www.th21.jp/adiary/diary1.cgi?id=spherebr&action=view&year=$years&month=$mons&all=yes

↑の「$years」「&mons」は変数なのです。
このままのURLを入れても、そのサービスでは月表示されません。

【例】2005年7月だとこうなります。
http://www.th21.jp/adiary/diary1.cgi?id=spherebr&action=view&year=2005&month=7&all=yes

この数字の部分を、毎月自動で変更したいのです。
さらに、携帯電話で同じような動作をさせたいのです。

☆ちなみに携帯電話のURLは、
2005年7月の場合こうなります。
http://www.th21.jp/diary.cgi?id=spherebr&dimo=7&diye=2005
回答者 sim  [削除]  投稿日 2005/7/2(土) 12:57:21
失礼しました。

#!/usr/bin/perl

$ENV{'TZ'} = "JST-9";
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime(time);
$years=$year+1900;
$mons =$mon+1;

print "Location: http://www.th21.jp/adiary/diary1.cgi?id=spherebr&action=view&year=$years&month=$mons&all=yes\n\n";
exit;



これではいかがでしょう。
質問者 たかし  [削除]  投稿日 2005/7/2(土) 13:05:15
ありがとうございました!!
ちゃんとできました!すごい!
もっと早くこちらで聞いていれば・・・。
本当に助かりました!
Simさん、ありがとうございました!

返信(回答)する

 


Web裏技