ＣＧＩだけど、なんか質問ある？part４
■ このスレッドは過去ログ倉庫に格納されています
0001名無しさん＠お腹いっぱい。
01/09/18 18:17ID:plR9HC2Eprint<<HTML_END;
<a href="http://corn.2ch.net/test/read.cgi?bbs=php&key=988727833" target="_blank">旧スレ</a>
HTML_END
0067名無しさん＠お腹いっぱい。
01/10/05 16:44ID:xs79T5cc日本語で書き込まれても中国語で書き込まれても、
文字コードをUTF-8に統一して保存および表示すれば、
混在可能だと思う。
特定の文字コードをUTF-8にコンバートするのは難しくない。
今のunixにはlibiconvという文字コード変換ライブラリや、
それを使ったiconvコマンドがあるし。
問題は書き込まれた文字コードの判定だ。
日本語だけという条件であっても、自動判別させようと思うと
Shjift_JISとEUC_JPを間違えることがあるぐらいだから、
中国語が入ったらさらに混乱必至ではないか（想像ですけどね）。
だったらブラウザから書き込むときに、もう最初っからUTF-8で
送信させればいいわけだ。
それは具体的にどうするか、ってのは正直スマンが知りません。
誰かフォロー頼む。
0068名無しさん＠お腹いっぱい。
01/10/05 16:46ID:???＞日本のCGIから日本語機能(?)を取り除く方法ってありますか？
ありますよ。でもスクリプト見ないと何も言えない。
006966
01/10/05 18:26ID:IlecsqKU現在使っているフリーのゲストブックはアメリカものなので、間違いなく
jcode.plは無関係で、英語はもちろん、中国語Big5，中国語GBでも
書込みOKです。（ブラウザで文字コードを変えればきちんとそれぞれ
読めます。当然、同時に全てをきちんと表示することは出来ませんが、
読めれば良いので問題ありません。）
ですから、英語のゲストブックCGIを使えば良いのでしょうが、ただでさえ
CGI素人なのに英語では更に厳しいので、日本のCGIを使いたいと思った
わけです。
＞68さん
いただいて来たスクリプトをテキストでアップしてみました。
↓
ttp://members.tripod.co.jp/k_napper/nyaponika.txt
これのどこを削ったりアレンジしたりすれば良いのか、ちょっと
わからないのです。
ご教授いただけると、とっても助かります。
0070名無しさん＠お腹いっぱい。
01/10/05 19:47ID:???ＣＧＩ改造スレのほうに回答が誤爆されてたヨ
http://ebi.2ch.net/test/read.cgi/php/988808396/392-394n
0071名無しさん＠お腹いっぱい。
01/10/06 02:00ID:MEgHrhMksplit("\n", $data)
でいいのでしょうか？ 改行コードってどんな端末からでも\n？
0072名無しさん＠お腹いっぱい。
01/10/06 02:12ID:???普通は $data =~ s/\r\n|\r/\n/g; こんなのが前に入る
0073名無しさん＠お腹いっぱい。
01/10/06 02:41ID:MEgHrhMk0074名無しさん＠お腹いっぱい。
01/10/06 02:49ID:???CGIでテキストデータを生成して、クライアント側に
保存させるにはどうやったら良いのでしょうか？
テキストデータには、text/plainなどのヘッダを
付けたくないのです。
0075名無しさん＠お腹いっぱい。
01/10/06 03:34ID:???もろにCGIの仕様に引っ掛かるもん
単にクライアントにコピペで保存してもらうだけなら
テキストエリアに吐き出してREADONLYとでもしとけば良いけど。。
ヤバ文字が含まれそうだったらちゃんとエスケープしてね。
無料サーバのファイルマネージャみたいな感じで
0076名無しさん＠お腹いっぱい。
01/10/06 03:34ID:KSO8kPZMhttp://natto.2ch.net/test/read.cgi?bbs=hp&key=999946244&st=804&to=804&nofirst=true
0077名無しさん＠お腹いっぱい。
01/10/06 03:59ID:???適当にまとめると，
クッキーで連続投稿を防止しようとしてるが，IEとネスケで動作が違う。実装の違いを教えれ。
ってことかな？
クッキーは勝手にネスケが開発してたので
仕様はnetscapeのサイトにあったはず。
W3Cの規格にはまだなってない。
ブラウザごとの実装の違いは知らない。
クッキーは拒否されることもあるので，
連続投稿規制はサーバーにIPとかを保存するようにするのが一般的。
0078JAPU
01/10/06 04:16ID:???(RFC 2109: HTTP State Management Mechanism)
Netscape のサイトにあるのはこれだね。
http://www.netscape.com/newsref/std/cookie_spec.html
# Netscape のサイト分かりにくすぎ。
0079名無しさん＠お腹いっぱい。
01/10/06 09:27ID:???えっと、テキストデータを生成して、保存させるための
ダイアログを出したいという感じです（あとはクライアントに
おまかせ）。
できればこのとき、デフォルトのファイル名もこちらで
準備したいです。
0080名無しさん＠お腹いっぱい。
01/10/06 10:32ID:???ヘッダを、
Content-disposition: attachment; filename="hoge.txt"
Content-type: application/octet-stream
にしたときは、ブラウザは保存ダイアログを出すべきだ、
…とRFC2616の19.5.1節に書いてあるよ。
ただし強い勧告(SHOULD〜)じゃなくて弱気な勧め(should〜)だし、
すべてのブラウザがこのRFCに準拠してるかどうか、非常に疑わしい。。。
昔のIEなんかだと、どんなHTTPヘッダを付けても
中身がテキストっぽければ画面に表示しちゃったからなあ。
0081名無しさん＠お腹いっぱい。
01/10/06 10:48ID:???そう言う意味だったのかー、ゴメソ
昔テキストのDLカウンター付けたくてちょっとやった事があったな
僕も>>80氏に激しく同意です。mustにして欲しい所だ
application/zipとか吐けばかなりの確立でDL窓出せるんだけどねー
ただCGI通したいだけならLocationで飛ばすとか
0082名無しさん＠お腹いっぱい。
01/10/06 10:49ID:???application/zip吐くとファイル名が.cgiになるので凄くダサいです
今のブラウザの実装は知らないけど
0083名無しさん＠お腹いっぱい。
01/10/06 10:57ID:???ヘッダに書いて、あとはクライアント次第ということで
行こうと思います。助かりました。
0084名無しさん＠お腹いっぱい。
01/10/06 11:06ID:???今でもそう、つーかバイナリ判別の精度が上がってるような (-＿-..
0085名無しさん＠お腹いっぱい。
01/10/06 11:21ID:MEgHrhMktext/plainだとブラウザで表示されちゃう率が高いから
application/octet-streamにするって感じ？
シフトJISそのまんま流すからapplication/octet-stream？
…ていうか漏れわけわかんないこと書いてる？
ヘッダむずかしー
0086JAPU＠神戸もとらだね！
01/10/06 11:24ID:???テキストファイルなのにapplication/octet-stream 吐き出すのは利用者にとっては迷惑かも知れない。
> 昔のIEなんかだと、どんなHTTPヘッダを付けても
> 中身がテキストっぽければ画面に表示しちゃったからなあ。
今でも中身をみて判断するというダサい実装になっている。
text/plain 吐き出しても HTML っぽければそう解釈するし。
>>82
moe.cgi/nae.zip のようにアクセスすると nae.zip というファイル名で保存できるかもしれない。
008780
01/10/06 12:13ID:780019M6あー、そうか。テキストだよな。
>テキストファイルなのにapplication/octet-stream 吐き出すのは
なはは。たしかに。
で、UserAgentを見てWin系なら改行コードを"\r\n"にするとか
小細工をはじめると、泥沼にズブズブ入っていくんですな、きっと。
＞text/plain 吐き出しても HTML っぽければそう解釈するし。
がーん。ほんとだ。ダセー＞IE5
0088名無しさん＠お腹いっぱい。
01/10/06 12:24ID:780019M6＞今でもそう、つーかバイナリ判別の精度が上がってるような (-＿-..
なんか最悪ですな。ヘッダを信用しないのはなぜだ？＞ＭＳ
サーバ管理者にはmime.typesを管理する能力がないとでも？
あ、それはApacheの話か。。。IISはその辺どーなってんの？
008976
01/10/06 13:59ID:???ありがとうございます。
確かにCookie拒否されたらダメでしたね…。
そこまで考えてませんでした。
IPアドレスなど使って作ってみようと思います。
実装の違いについては、
$ENV{'HTTP_COOKIE'}を両者に吐かせてみても違っているので
もうちょっと調べてみたいと思います。
0090名無しさん＠お腹いっぱい。
01/10/07 13:18ID:n4Hjc.oIその事を来て頂いていた皆さんにお知らせしたいのです。
閉鎖にいたっての報告などはHTMLに書きWWWにアップして
いるのですが、そのURLに自動的にジャンプするには
どういったcgiを書けばよいのでしょうか？
掲示板にURLを書けば良い事なのですが掲示板はもう削除して
しまって無いので自動的にそのURLにジャンプするcgiを教えて下さい。
0091名無しさん＠お腹いっぱい。
01/10/07 13:46ID:???CGIなら。
#!/usr/local/bin/perl
print "Location: http://xxx.net/user/info.html\n\n";
.htaccessが使えるなら。
Redirect "/user/bbs/bbs.cgi" "http://xxx.net/user/info.html"
0092名無しさん＠お腹いっぱい。
01/10/07 17:10ID:n4Hjc.oIありがとうございます。
0093名無しさん＠お腹いっぱい。
01/10/07 20:05ID:TC4eI282うとしたんですが、トラブってしまいました。
で、調べてみたら環境変数 PATH_INFO の値が変です。
http://hoge.fuge.co.jp/bbs/bbs.cgi
がスクリプトへの URL だとすると、
PATH_INFO=/bbs/bbs.cgi になっています。この値が設定さ
れていると CGI.pm の url(-relative=>1) が undef になり、
また url(-absolute=>1) は空文字列になっちゃうようです。
とりあえず new CGI をする前に $ENV{PATH_INFO} = '' と
して逃げましたが、同様の問題を経験された人はいますか？
あるいは、このサーバの設定が悪かっただけでしょうか…
0094名無しさん＠お腹いっぱい。
01/10/08 00:40ID:???丁度今の2chのread.cgiみたいにしてたんで困ったよ
結局正規表現でゴミ取って、使ってたけど鬱陶しいからQUERY使うようにしたよ（´Д｀；） ﾍﾅﾍﾅ
原因不明、多分設定がタコだと思ったんだけど
俺も知り鯛あげ！
0095名無しさん＠お腹いっぱい。
01/10/08 00:41ID:???0096名無しさん＠お腹いっぱい。
01/10/08 11:29ID:???触ったことないけどCGIWrapの問題？
古いApacheだとhttpd.confのAlias設定でも問題出るらしい？
009793
01/10/08 16:07ID:???を検索すると、同じような問題が出ていますね。原
因はまだよく分かりませんが。
0098名無しさん＠お腹いっぱい。
01/10/08 16:20ID:???つーか自動的にジャンプさせるぐらい
METAタグでできるだろ。
0099名無しさん＠お腹いっぱい。
01/10/08 16:38ID:???でもMETAタグを含むHTMLデータをbbs.cgiに吐かせるぐらいなら
Locationでいいじゃん？
0100名無しさん＠お腹いっぱい。
01/10/08 16:47ID:???分かりきった事得意げに書くなよ （´Д｀；） ｱｳｱｳｰ
010193
01/10/08 16:50ID:???もっと新しいバージョンなら url() のコードも変わっ
ているので、問題無いかも。
0102名無しさん＠お腹いっぱい。
01/10/08 17:11ID:???今CGI.pm ver2.752のソースみたら、PATH_INFOを含む部分の
コードが何行かコメントアウトされてますね（笑
そしてCGI.pmのurl()が正しく動作するようになっても
PATH_INFO自体を使いたいという>>94の願いが
天に届くことはなかった。。。ﾅﾑﾅﾑ
010393
01/10/08 17:31ID:???> 今CGI.pm ver2.752のソースみたら、PATH_INFOを含む部分の
> コードが何行かコメントアウトされてますね（笑
# If anybody knows why I ever wrote this please tell me!
ってアンタ（藁
> そしてCGI.pmのurl()が正しく動作するようになっても
> PATH_INFO自体を使いたいという>>94の願いが
> 天に届くことはなかった。。。ﾅﾑﾅﾑ
url() なら代替案はいろいろありますがねぇ…
http://list.cobalt.com/pipermail/cobalt-users/2000-October/023300.html
AliasMatch と CGIWrap の関係で PATH_INFO が
正しくならないのは、仕方無いのかな…
0104名無しさん＠お腹いっぱい。
01/10/08 17:52ID:???ore no eigoha metyakutya daze!!!!!
0105名無しさん＠お腹いっぱい。
01/10/08 19:45ID:x261FvpI必須項目が入力されていない場合はエラー用のページに飛ばして、そこに戻る
ボタン（単なるリンク）を用意しています。
その戻るボタンをクリックして最初のアンケートページに戻る際、各質問項目に
前回の値（ユーザーがエラーページに飛ばされる前に入れていた値）をあらかじめ
入れておきたいのですが、どうやれば出来るのか上手く出来るのかが分かりません。
フォームデータはCGI_Lite.pmを使ってます。ヒントでも良いので、よろしくお願いします
0106名無しさん＠お腹いっぱい。
01/10/08 20:11ID:???『ブラウザの「戻る」ボタンを押して戻ってください』
とエラーページに書いておく。カコワルイ?
解決になっていないような気もする。
0107名無しさん＠お腹いっぱい。
01/10/08 20:15ID:???foreach(keys %FORM){
print qq(<input type=hidden name="$_" value="$FORM{"$_"}">\n);
}
を、戻るボタンのところに埋め込めば？
0108名無しさん＠お腹いっぱい。
01/10/08 20:23ID:???print<<"_END_";
ﾌﾞﾗｳｻﾞのﾊﾞｯｸﾎﾞﾀﾝをｵｼﾃｸﾚ ｗ
_END_
0109名無しさん＠お腹いっぱい。
01/10/08 20:26ID:WEFUx3wE0110名無しさん＠お腹いっぱい。
01/10/08 20:33ID:???http://salad.2ch.net/download/
0111名無しさん
01/10/08 20:44ID:???一番いいような気がしますが。
どうしてもHTMLで書かれたアンケート入力ページに戻したいという動機があるなら
JavaScript+Cookieとか？
0112名無しさん＠お腹いっぱい。
01/10/08 20:47ID:???「戻らない」っていう方法もあるかも。不備の
ある部分だけのフォームを表示し続ける。OK な
項目は hidden で渡して逝く。
Yahoo Japan ID の登録がそんな感じだったと
思う。
手間がかかる割りに役に立たないような。
0113名無しさん＠Windowser
01/10/09 10:19ID:???とりあえず読み込み・初期化(do FILE)だけを比べてみると5倍ほど早いようですが。
0114名無しさん＠Windowser
01/10/09 11:13ID:???#line 170 CGI/Object/Html.pm
にバグみっけ。
[CGI.pm version3.01]
0115名無しさん
01/10/11 22:51ID:OddRAZgwそこで、とりあえず、ソースをつくって、
コンパイルしようとしたら、
#perl bbs2.cgi
(offline mode: enter name=value pairs on standard input)
というエラー？？がでます。
意味が分かりません。
さらに、僕は、このcgiで
use DBI;
use strict;
use CGI;
use Date::Calc qw(Today Add_Delta_Days);
というふうに書いているのですが、
DBIとDate::CalcはCPANからインストールしたのですが、
CGIとstrictそのものは、CPANにおいてなかったませんでした。
この２つのモジュールは最初から入っていますよね？？
ちなみにOSはFreeBSDでapacheを使ってます。
0116名無しさん
01/10/11 22:52ID:OddRAZgwinternal server errorがでます。
昔は、動いたんですが。
0117名無しさん＠お腹いっぱい。
01/10/11 23:55ID:aIf8/rowそれ、なぜかCGI.pmがフルデバッグモードで動いてるみたいです。
use CGI qw(-no_debug ・・・);
と、-no_debugを指定すると消えませんか。
くわしくはperldoc CGIで"DEBUGGING"の説明を見てください。
0118115
01/10/12 00:01ID:2WUE5QsIほんとだ！
できました。こういう事がおきると初心者には対処できないです。
CGI、別に何もいじってないんですが。。。
"DEBUGGING"また読んでおきます。
0119名無しさん＠お腹いっぱい。
01/10/12 00:20ID:???バージョンによっては$CGI::DEBUGの初期値が2に設定されてるのでは
ないかと推測。本来は1なんですよね？
ていうか今↓のスクリプトを実行したらDEBUG=1になってた。
use CGI;
print "VERSION : $CGI::VERSION\n";
print "DEBUG : $CGI::DEBUG\n";
実行結果
VERSION : 2.752
DEBUG : 1
0120名無しさん＠お腹いっぱい。
01/10/12 15:23ID:2WUE5QsIしかし、以下のソースだと、ページをリロードするたびに、
同じ内容の投稿がなされてしまいます。その改善法を御教示お願いします。
0121part1
01/10/12 15:24ID:2WUE5QsIuse DBI;
use strict;
use CGI qw(-no_debug);
use Date::Calc qw(Today Add_Delta_Days);
#パスの設定
my $nkf = '/usr/local/bin/nkf';
#オブジェクトの生成
my $q = new CGI;
my $msg = $q->param('msg');
#出力文字コードの設定
open HTML, "|$nkf -e";
select(HTML);
$|=1;
0122part1
01/10/12 15:25ID:2WUE5QsIuse DBI;
use strict;
use CGI qw(-no_debug);
use Date::Calc qw(Today Add_Delta_Days);
#パスの設定
my $nkf = '/usr/local/bin/nkf';
0123part2
01/10/12 15:25ID:2WUE5QsIprint $q->header(-expire=>'now');
print $q->start_html(-title=>'bbs',-bgcolor=>'#DDDDDD');
print "掲示版";
print $q->hr;
print $q->start_form(-method=>'POST',-action=>'./bbs2.cgi');
print $q->textarea(-name=>'msg',
-rows=>3,
-column=>16);
print "<br>\n";
print $q->submit(-name=>'submit',-value=>'送信');
print $q->end_form;
if ($msg ne '' ){
open(OUT,">> ./bbs2.dat");
print OUT "$msg<HR>\n";
close(OUT);
}
0124part3
01/10/12 15:26ID:2WUE5QsI# データファイル内容を表示
open(IN,"./bbs2.dat");
print <IN>;
close(IN);
print $q->end_html;
close(HTML);
0125名無しさん＠お腹いっぱい。
01/10/12 15:27ID:2WUE5QsIの順番のソースファイルです。
ソースそのままはれるかと思ったら
"改行多すぎます"
といわれたので、分割しました。
掲示板ぐちゃぐちゃにしてごめんなさい
0126ソースは見てないけど ＾-＾；
01/10/12 15:39ID:???POSTに値がセットされた状態でリロードされるから
いやならLocation: ./script.cgi\n\n か
METAでほげってセッションを分けるですの
0127名無しさん＠お腹いっぱい。
01/10/12 15:39ID:???・直前のデータを読み込んで、内容を比較する
・ワンクッション置く（「無事投稿されました」のようなページを置く）
・最後にLocationで飛ばす
があります。
リロードで送信されるのを避けるにはLocationが適当でしょう。
0128名無しさん＠お腹いっぱい。
01/10/12 15:42ID:AsTpdvqAuse DBI;
0129120
01/10/12 16:15ID:2WUE5QsIありがとうございます。
頑張ります。
0130名無しさん＠お腹いっぱい。
01/10/12 21:04ID:YvyJWcYocookieが上手くブラウザに格納されてくれません。
ひょっとして http://localhost/ だとだめなんでしょうか？
あと path、domeinって省略してもブラウザで勝手に解釈
してくれるんでしたっけ？
0131130
01/10/12 21:10ID:???自己レスです。
cookie吐き出すだけのやつ試してみたらちゃんとlocalhostでも
登録されていました。どうやら他に原因があるようです。
どうもすいませんでした。
0132名無しさん＠お腹いっぱい。
01/10/13 02:00ID:???＞してくれるんでしたっけ？
OK、でもDOTが2つ無いとダメだよ
0133130
01/10/13 02:09ID:???HTTP::C\ookiesの
scalar( $cookie_ja->as_string );
で取り出した expires の書式が
Mon, 31, Dec 2001 20:00:00 GMT
じゃなくて
2001-12-31 22:00:00Z
になっていたのが原因でした（なぜにこの書式？）。
>>132
DOT２つというのはどういうことでしょう？
0134名無しさん＠お腹いっぱい。
01/10/13 02:16ID:???DOT２つってHTTP::Cookies使うときでしょ！
おれもハマッたことあるよー。やっぱlocalhostでした。
あれはナニ？Cookieにそんな制限あるんですか？
0135名無しさん＠お腹いっぱい。
01/10/13 02:21ID:???セキュリティ確保なんだけど、実は1つでも良いんだよなあ･･･
http://www.netscape.com/newsref/std/cookie_spec.html
0136名無しさん＠お腹いっぱい。
01/10/13 02:23ID:???0137名無しさん＠お腹いっぱい。
01/10/13 02:23ID:???s/僕も/僕は/ (-_-)
0138134
01/10/13 02:48ID:Deyy6KfQおお。さんきゅ。セキュリティかー。
0139名無しさん＠お腹いっぱい。
01/10/13 03:34ID:qXCBod/Uローカルマシン
↓
CGI（ LWP::UserAgent、HTTP::Cookies使用 ）
↓
目的のサイト
という中継ツールなのですが、「目的のサイト」のcookieを
ローカルマシンに保存することはできました。
しかしそれを「目的のサイト」側から読ませることができません。
具体的には以下のようにやっています。
----------------------------------
$ua = LWP::UserAgent->new;
$ck = HTTP::Cookies->new;
$hd = HTTP::Headers->new;
$req= HTTP::Request->new( 'GET', 'http://www.hoehoe.com/' );
### ブラウザの cookie情報をドメインを書き換えて登録
foreach $ckey ( keys %COOKIES ){
$ck->set_cookie( , $key, $COOKIES{$key}, '/', '.hoehoe.com', , , ,60*60*24*365*10 );
}
$ck->add_cookie_header( $req );
$ua->cookie_jar( $ck );
$res = $ua->request( $req );
$ck->extract_cookies( $res );
----------------------------------
ドメイン名を書き換えて HTTP::UserAgent に登録って出来るのでしょうか？
0140名無しさん＠お腹いっぱい。
01/10/13 06:40ID:bzY0j0uYカウンターなんですけど、
ソースにはちゃんと出てるのに
画像が表示されないのはなぜですか？
<img src="cgi-bin4/ecount.cgi?6"width="6" height="13">
こんな感じで設置してるのですけど。
0141名無しさん＠お腹いっぱい。
01/10/13 07:48ID:???まず基本的なこととして、カウンターのＵＲＬを直接入力してちゃんと表示されるか確認してみよう。
それで表示されたら単なるＵＲＬの指定ミス。
表示されなかったらスクリプトの問題。
スクリプトのソースを公開したまへ。
0142140
01/10/13 08:49ID:bzY0j0uYわざわざ有難う御座いますです。
ログファイルのパス：OK!
ログファイルのパーミッション：OK!
画像：./gif/0.gif → OK!
画像：./gif/1.gif → OK!
画像：./gif/2.gif → OK!
画像：./gif/3.gif → OK!
画像：./gif/4.gif → OK!
画像：./gif/5.gif → OK!
画像：./gif/6.gif → OK!
画像：./gif/7.gif → OK!
画像：./gif/8.gif → OK!
画像：./gif/9.gif → OK!
ロック形式：symlink
ロックディレクトリのパス：OK!
ロックディレクトリのパーミッション：OK!
ちゃんとOKでてるのになぜか画像表示されない・・・
0143名無しさん＠お腹いっぱい。
01/10/13 08:52ID:???そうじゃなくて。
http;//xxxxxxxx.com/cgi-bin4/ecount.cgi?6
でカウンターは表示されるの？
0144140
01/10/13 09:01ID:bzY0j0uYはい。画像はちゃんと表示されました。
0145名無しさん＠お腹いっぱい。
01/10/13 09:07ID:???じゃあ、ソース公開きぼん。
ソースを見ないと画像の表示されない理由はわからないよ。
Content-typeが間違ってるとかじゃないの？
0146140
01/10/13 09:23ID:bzY0j0uYkentのecountなんですけど。。
open(IMG,"$imgdir$view$tail") || &error;
print "Content-type: image\/$mime\n\n";
binmode(IMG);
binmode(STDOUT);
print <IMG>;
close(IMG);
こんな感じなんですが間違っているのかどうか
さっぱり分かりませんです。
0147名無しさん＠お腹いっぱい。
01/10/13 10:04ID:???で画像が表示されるなら
<img src="cgi-bin4/ecount.cgi?6"width="6" height="13">
が間違ってるんだろ。
0148名無しさん＠お腹いっぱい。
01/10/13 10:35ID:???そうだ。
ちょっと眠かったからボケてしまった。
スマソ。>140
0150139
01/10/13 14:33ID:qXCBod/U$ck->set_cookie( , $key, $COOKIES{$key}, '/', '.hoehoe.com', , , ,60*60*24*365*10 );
↑でドメイン、パスを書き換えて UserAgentに cookieを登録することは
出来ましたが、目的のサーバーからは見えないようです。
HTTP::UserAgentって自分の $ENV{'HTTP_COOKIE'} を持つことは
できないのですか？
0151名無しさん＠お腹いっぱい。
01/10/13 14:51ID:???getenv()をどう使ったら全部表示させられるか教えてください。
0152名無しさん＠お腹いっぱい。
01/10/13 15:01ID:c5AddB8Uint main(int argc, char **argv, char **envp) {以下略
あとはenvpから取得。つーのを愛用してます。
0153名無しさん＠お腹いっぱい。
01/10/13 15:15ID:???main() の第3引数を使え。
getenv() は特定の環境変数だけだろ。
0154名無しさん＠お腹いっぱい。
01/10/13 17:16ID:???melt.cgi/www.hoge.net/hoge.lzh/readme.htm
とするとhoge.lzh内のreadme.htmが表示できるみたいな奴。
0155名無しさん＠お腹いっぱい。
01/10/13 17:33ID:???このスレに書いたということは、そのやり方を教えてくれという事か？
とりあえずLWPでアーカイブを取ってきて
適当なモジュールなり外部プログラムなりで展開して
目的の文書を探す、という感じだと思うが。
まぁ非効率的だな。
0156名無しさん＠お腹いっぱい。
01/10/13 17:51ID:???プロトコルって、あったら便利かもなー。
そういうのがあれば、>>154みたいなCGIも効率的に書けそう。
0158JAPU@見知らぬ国のトリッパー ◆dcddJAPU
01/10/13 18:06ID:???ってのもあるな。
何種類かのUNIXで調べたけど、全部であったからそれなりに移植性はありそう。
(FreeBSD, OSF1, Linux)
0159名無しさん＠お腹いっぱい。
01/10/13 18:16ID:???environてのはANSIの規格にないんでしたっけ？
main()の第3引数はたしか(char**)型で環境変数が入るって
規定されてようなおぼろげな記憶。。。
0160JAPU@見知らぬ国のトリッパー ◆dcddJAPU
01/10/13 19:20ID:???とりあえずこんなの発見。
http://cgi3.tky.3web.ne.jp/~yutakakn/misc/tips/clang/page1.html
0161名無しさん＠お腹いっぱい。
01/10/13 21:34ID:nMwqY5mo0162名無しさん＠お腹いっぱい。
01/10/13 21:36ID:???こちらへどうぞ。
http://natto.2ch.net/hp/
0163名無しさん＠お腹いっぱい。
01/10/13 23:26ID:AeCpTnbA現在のデータ形式は↓こんなのです。（本当はタブ区切りです）
めろん<>山田
めろん<>田中
めろん<>鈴木
すいか<>山田
すいか<>鈴木
いちご<>田中
りんご<>鈴木
ぶどう<>鈴木
ぶどう<>竹下
ぱいん<>山田
このままだと見づらいので、
3<>めろん<>山田<>田中<>鈴木
2<>すいか<>山田<>鈴木
2<>ぶどう<>鈴木<>竹下
1<>いちご<>田中
1<>ぱいん<>山田
1<>りんご<>鈴木
こんな風にデータをコンバートして重複部分をまとめたいんです。
ソートを使えばいいのかなと思ったんですが、アイデアが浮かびません。。
「こうすりゃいいだろｺﾞﾙｧ」という方法があったらご教授下さい。
0164素人的見解
01/10/13 23:40ID:???めろん<>田中
めろん<>鈴木
すいか<>山田
すいか<>鈴木
いちご<>田中
りんご<>鈴木
ぶどう<>鈴木
ぶどう<>竹下
ぱいん<>山田
↑これが@dataに入っているとして
foreach(@data){
$_ =~ s/\n//;
@mini = split(/<>/);
$count{"$mini[0]"} ++;
$touhyou{"$mini[0]"} .= "<>$mini[1]";
}
foreach(sort{$count{"$a"} => $count{"$b"}} keys %count){
push(@save_data,qq($count{"$_"}<>$_$touhyou{"$_"}\n);
}
もっと効率いい方法はあると思う・・・。
0165名無しさん＠お腹いっぱい。
01/10/13 23:59ID:???use constant SEPARATE => qq(<>);
use strict;
my %data = ();
while(<DATA>){
chomp;
my($hoge, $fuga) = split SEPARATE;
push @{$data{$hoge}}, $fuga;
}
# 試しに出力
foreach (
sort{ @{$data{$b} } <=> @{$data{$a}} } keys %data
){
print "$_=>", join(",", @{$data{$_}}), "\n";
}
__DATA__
めろん<>山田
めろん<>田中
めろん<>鈴木
すいか<>山田
すいか<>鈴木
いちご<>田中
りんご<>鈴木
ぶどう<>鈴木
ぶどう<>竹下
ぱいん<>山田
■ このスレッドは過去ログ倉庫に格納されています