ＣＧＩだけど、なんか質問ある？Part 5

**名無しさん＠お腹いっぱい。** · 01/12/26 10:51

■過去ログ
　Part 3 http://pc.2ch.net/test/read.cgi/php/988727833/l50
　Part 4 http://pc.2ch.net/test/read.cgi/php/1000804655/l50

その他参考になるスレッドを >>2 に纏めたので、十分に調べた上で質問して下さい。

**名無しさん＠お腹いっぱい。** · 02/02/12 20:28

File Upload CGI Second Editionを設置したら、一部ファイルが削除できなくなってしまいました。
削除方法を教えてください。
掲示板も潰れてて質問もできないです。
http://homepage1.nifty.com/~heppoko/
↑ここで配布してます。

**名無しさん＠お腹いっぱい。** · 02/02/12 21:01

プログラマに向いていない度
>>612＞＞＞＞＞＞＞＞>>628＞＞>>623
>>628
＞いかに少ない手間で望んだ処理を実装できるかがプログラマのセンスだ。
少ない手間で済まそうと、CGI.pmを多用して鯖に迷惑をかける人の発言っぽいので減点。
>>629
激しく同意
>>612
タグのたかが40個も書けない奴はJAVAを書くとしたらハローワールドしか
書けません。逝ってﾖｼ

**630** · 02/02/12 21:08

削除用CGIスクリプトを見つけて自己解決です。
また質問するかもしれないのでよろしく。

**名無しさん＠お腹いっぱい。** · 02/02/12 21:15

>>630
File Upload CGI Second Editionというのを設置した事がないんだが、
FTP（か付随のファイルマネージャ）を使って削除すればいいんでは？
其れとも、それ自体ができないのか？　関係ないならスマソ

**名無しさん＠お腹いっぱい。** · 02/02/12 21:18

>>633
CGIで負荷をかけつつファイルをうｐするなんてナンセンスだよね。
FTP使ったほうが数倍まし。
実際そういうスクリプトってプログラマが自己満足（勉強）のためだけに作成
してるパターンが多いと思う。。

**名無しさん＠お腹いっぱい。** · 02/02/12 21:24

>>634
20-21番ポートが閉じられている教育機関がどれだけ多いか考えたこと無いだろ？

インターネットへのゲートウェイとしてHTTPプロキシしか用意されていない環境とか想像したこともないだろ？

FTPでも負荷はかかるって驚愕の新事実だろ？

自分の世界だけで人をバカにしないように。

**名無しさん＠お腹いっぱい。** · 02/02/12 21:31

>>635
"設置したら"っていってるんだからFtpで設置したんでしょ

**名無しさん＠お腹いっぱい。** · 02/02/12 21:33

>>635
別にバカになんかしてなぃょぅ。。
実際漏れは自己満足だけのためにアップロードcgiを作成中だから
言ってみたんだよ。ｺﾞﾒﾝﾈ。

**名無しさん＠お腹いっぱい。** · 02/02/13 13:16

>>612
gifcat.pl使って同じ問題発生してるよ。
透過gifを使った場合にグチャグチャな表示になる。
透過gifじゃない場合は最初の一桁が黒くなる。
とほほのページも後者になってるから、たぶんgifcat.plの問題っぽい。
全然解決策じゃないけど、透過gifを止めて桁数を1つ多くしとくとか。

**教えてください。** · 02/02/13 17:00

すみません。教えてください。
ＳＳＩのような感じで外部htmlをcgiのページに入れることって可能ですか？
ちなみにshtmlに外部htmlだと「#include」を使います。
こんな感じにcgiのページに取り組むことって出来るのでしょうか？
よろしくお願い致します。

**名無しさん＠お腹いっぱい。** · 02/02/13 17:25

>>639
CGIにそのような機能は無いが、
CGIスクリプト自身で実装は可能。

**639** · 02/02/13 17:40

ありがとうございます。
やっぱそういった機能はないんですか。

＞CGIスクリプト自身で実装は可能。

たとえばどういった方法ですか？
重ねて質問でスミマセン・・・。

**名無しさん＠お腹いっぱい。** · 02/02/13 17:51

HTMLファイルをオープンしてプリント。

**639** · 02/02/13 18:01

>>642
うーんやっぱそれしかないですかぁ。
いろいろありがとうございました。
勉強になります。

**伝説の勇者ロリ** ◆Ug2000AA · 02/02/13 19:04

17ｽｸﾘﾌﾟﾄで作った掲示板をリスト表示するスクリプトをかいて下さい

**名無しさん＠お腹いっぱい。** · 02/02/13 20:03

>644
みかえりは？

**名無しさん＠お腹いっぱい。** · 02/02/13 21:03

http://www.wired.com/news/business/0,1367,42276,00.html
みたいなこんまつきURLは、どういったシステム（？）を
使ってるときのURLなんですか？

**名無しさん＠お腹いっぱい。** · 02/02/13 22:51

>>646
開発者の趣味じゃないの？

**名無しさん＠お腹いっぱい。** · 02/02/14 13:29

>>631
>少ない手間で済まそうと、CGI.pmを多用して鯖に迷惑をかける
この部分、詳しくキボンヌ

**名無しさん＠お腹いっぱい。** · 02/02/14 16:09

WindowsでＣＧＩチェックするには何使ってますか。
anhttpd使ってたんだけど、だんだん重くなって困る。win98se
ってことでapache入れてみたんだけど、サーバーにＰＵＴするときは１行目は
絶対書き換えなきゃならないの？

**名無しさん＠お腹いっぱい。** · 02/02/14 16:29

>>648
>>631じゃないが
CGI.pmはメモリを食う(といってもても1MB程度だが)のだ。
それにコンパイルにもかなり時間がかかる。これCGIスクリプトとしては致命的。
自鯖やmod_perlならともかく、共用鯖で使用するのはお勧めできない。

**名無しさん＠お腹いっぱい。** · 02/02/14 16:49

　　　／∵∴∵∴＼
　　 /∵∴∵∴∵∴＼
　　/∵∴∴,（･）（･）∴|
　　|∵∵／　　 ○　＼|
　　|∵ /　　三　|　三　|　　／￣￣￣￣
　　|∵ |　　　＿_|＿_ 　|　＜　CGI.pm、素人にはお勧め出来ない。
　　＼|　　　＼＿/　／　　＼＿＿＿＿
　　　　＼＿＿＿_／

**名無しさん＠お腹いっぱい。** · 02/02/14 17:51

CGI.pmの機能のうち、URLデコードしか使わないのなら、おなじみのコードのコピペかcgi-lib.plで十分だよな。

**名無しさん＠お腹いっぱい。** · 02/02/14 18:46

>>652
得意げな顔して何がコピペかcgi-libだよな、だ。
お前は本当に分かっているのかと問いたい。問い詰めたい。小一時間問い詰めたい。
まぁ普通はCGI::LiteかCGI::Minimalでも使ってなさいってこった。

**名無しさん＠お腹いっぱい。** · 02/02/14 19:33

>>653
しかし事実だろ。

**名無しさん＠お腹いっぱい。** · 02/02/14 19:50

質問質問！
http://pc.2ch.net/test/read.cgi/php/1003132904/928で発言したんだけど、cgiってphpの変数出力ってできるのかな？
ちょっとcgiのこと（仕組みとか）わからないんだけども、cgiはphpの実行権限がないのかな、とか思った。かなり的外れっぽいけど

**名無しさん＠お腹いっぱい。** · 02/02/14 20:22

URLデコードもファイルのアップロードも、もう汎用のルーチンが
出そろっているにもかかわらず(しかも、俺専用サブルーチン化も終わってる)
CGI.pm使うメリットってあるのでしょうか？

**名無しさん＠お腹いっぱい。** · 02/02/14 20:30

>>649
httpd.confで
ScriptInterpreterSource registry
というところを探してみな。
せっかくだからapacheスレも読んでおけ。ためになるはず。

**名無しさん＠お腹いっぱい。** · 02/02/14 20:47

>>656
メリットがあるか否か、と問われれば"ある"だろうよ。
param()を初めとしてquery_string()、header()、self_utl()、cookie操作といったメソッド群は捨てがたい。
ただそれに伴うデメリットが大きすぎるように感じるので俺は自作のを使うが。

**名無しさん＠お腹いっぱい。** · 02/02/14 22:29

どなたか教えてください。
あるドメイン上で食べさせたCookeiを全く違うドメイン上で有効にさせることってできるんですか？

**名無しさん＠お腹いっぱい。** · 02/02/14 22:30

>659
DNSのセキュリティホール使ってなりすましましょう。

**名無しさん＠お腹いっぱい。** · 02/02/14 22:36

>660
そうゆう問題になってしまうんですか．．．。
要するに別々の違うドメイン同士でシングルサインオンを実現したいんですけど、
何かやりかたありますか？

**名無しさん＠お腹いっぱい。** · 02/02/14 23:59

あのね、Cookieがそんなことが簡単に許したらさ、サイトに来る
やつのオンラインショッピングやバンキングのIDとパスワードを
getしようとする輩の片棒を担ぐことになりませんか？

**名無しさん＠お腹いっぱい。** · 02/02/15 00:47

>661

print <<HTML_SOURCE;
<HTML>
<HEAD>
　<TITLE></TITLE>
　<META http-equiv="refresh" content="0;URL=目的のドメイン">
</HEAD>
<BODY>
　<INPUT type="HIDDEN" name="id" value="id">
　<INPUT type="HIDDEN" name="pass" value="pass">
</BODY>
</HTML>
HTML_SOURCE

とりあえず移動はできたけど？

**名無しさん＠お腹いっぱい。** · 02/02/15 01:19

両方ともSSL内で、最初のドメインでログインした情報、でなくてもいいんですけど、
「どっからのリンクか」とかIDとかをCookeiにのこして、
移りたいドメインの方でそのCookeiを認識して、
そのままログインできないかってことなんですけど、
やっぱり無理なものですか？
突拍子もないこと言ってたらすみません。

**612** · 02/02/15 01:56

>>638
めちゃめちゃ遅レスですが、gifcat.plの件、ありがとうざいます。
gifcat.plの中身を勉強してみます。

**名無しさん＠お腹いっぱい。** · 02/02/15 02:27

結局、Cookie とビスケットの違いは何なんでしょうか？

このままではのどが乾きすぎて食べることができません。

**名無しさん＠お腹いっぱい。** · 02/02/15 03:38

CGI.pmのコンパイル時間ってそんなに気になるものか。
そうなると、他のモジュールもつかえねーなぁ。
まあおれも自作のCGI::*作ってるけど。

**名無しさん＠お腹いっぱい。** · 02/02/15 07:10

>>667
コンパイル時間よりモジュールの能力や使用目的と
メモリの消費量との比較の話だと思うぞ。
デコードしたいだけで使うな、しかも共用鯖で。って話。
かといってすげー高機能なことをしたいし実際
するモジュールなのでメモリくいますって言われてもウザいけどな。
結局は「共用鯖でメモリくうな」って話か。@data=<IN>と一緒で。

**名無しさん＠お腹いっぱい。** · 02/02/15 13:18

http://www.ace-cgi.jp/
↑のニセビンゴゲームEXと言うのをDLして、鯖にUPもしたんですけど、
説明が不十分すぎて全然わかりません。
これはどういうタグを打ったら、HPに表示されるんですか？
そして、説明にはビンゴの一日に発表する数字が変えられるとか書いてあるけど、
CGI初心者なのでどこを書き換えればいいのか全然わかりません。
質問メール禁止ってかいてあるけど、あんな説明じゃ全然わからないので、
メール送ったらやっぱり無視されてるし・・・。
もう2chでしか解決する手段がないんです。
どうかよろしくお願いします。

**名無しさん＠お腹いっぱい。** · 02/02/15 16:35

sendmail等が使用出来ないサーバではご利用頂けません。
ってかいてあるよ

**名無しさん＠お腹いっぱい。** · 02/02/15 16:52

>>669
アンタが何をしたいのか、説明が不十分すぎて全然分からない。
> これはどういうタグを打ったら、HPに表示されるんですか？
どういう意味？

**名無しさん＠お腹いっぱい。** · 02/02/15 16:56

>>669のサイトより引用

> このようなホームページを運営していると、色々な方からメールを頂きます。
> 励ましのお言葉やお礼を言ってくださる方。本当に嬉しく思います。
> このようなメールを頂ける為、私の場合は結構恵まれていると思います。
> しかし、本当に「常識あるの？」という人も非常に多いのです。
> まったく知らない人にメールを送る場合、普通は「送っていいものか」考えませんか？
> たとえば、「○○についてのメールはお断りします」「メールを頂いても返信致しません」等、注意書きがないかをよく捜してからメールするのが普通ではないでしょうか。
> 私のＨＰには、あちこちに「サポート目的のメールはお断りします」と書いているのにも関わらず、沢山のサポートメールが届きます。
> 性格的に、来たメールに対して無視する事が出来ずにそれなりの返答をしておりました。が、きりが無いので今では返事を出す事を辞めました。
> 文面が丁寧であればまだ我慢も出来ますが、礼儀も何もあったものではないメールも多いです。
> 「うまく行かないんですけど～どうすればいいの？」「パーミッションってなに？」
> 突然知らない人にこんな口調でものを言っていいもんなのか、、、、

>>669
これでもメールを送るとは、お前相当な厨だな。

**名無しさん＠お腹いっぱい。** · 02/02/15 18:11

>>657
ありがとうございます。勉強します。

**名無しさん＠お腹いっぱい。** · 02/02/15 18:12

HTML::Template に変わる軽くてイケてる Template モジュールないかな。
いままで、平気で HTML::Template 使ってたが、なんだか馬鹿でかいモジュール
は迷惑らしいんで。

**名無しさん＠お腹いっぱい。** · 02/02/16 00:26

>>674 自分で作っちゃえば？

**osiete** · 02/02/16 05:46

biglobeでapebord+を使おうとしているんですけど、
うまく行かないので教えて下さいませ。

とりあえずapeのオンラインマニュアルに従って設定して、
鯖にあげ、パーミッションもそこに書いてあるとおりに変更しました。

それからapebord_p.cgiにアクセスすると
Forbidden　
Your client is not allowed to access the requested object.
と出てしまいます。

cgi自体の設定は何度も見直したので間違いはないと思います。
サーバメッセージからやはりパーミッションに問題があるのでしょうか？
鯖によって別のパーミッションを設定した方がいいのでしょうか？
また実際にbiglobeにapebordを設置している方がいらっしゃったら
アドバイスを下さい。

02/02/16 05:48

Your client is not allowed to access the requested object.
って、エラーが出てるでしょ。
許されてないわけよ。ようするに。

**osiete** · 02/02/16 05:52

>>766
つまりはビッグローブではエイプは使えないと言う事ですね。
アリガトウございました。
諦めがつきました。

**名無しさん＠お腹いっぱい。** · 02/02/16 07:58

>>678
ディレクトリのパーミッションは大丈夫？
http://kingdom.biglobe.ne.jp/help/secstabl.html

**Name_Not_Found** · 02/02/16 08:32

>>665
とほほのサイトにはこう書いてある。
> ・Netscape 6.* では、一番最初の桁がうまく表示できないことがあり
> ます。→ 一番最初の画像の大きさが全体と異なる場合に表示がおか
> しくなるという、ブラウザ側のバグが原因だと推測しています。

**osiete** · 02/02/16 09:36

>>679
あれ？ディレクトリにパーミッションなんてあったんですね。
ありがとうございます。試してみます。
後ほど報告します。

ちなみに679さんはビッグローブでapebord使ってるんですか？

**osiete** · 02/02/16 10:12

調べたところディレクトリのパーミッションはＯＫでした。
しかし、ダメでした。

なんか、掲示板本体のcgiを755、
jcode.plを705に設定しなければならないんですけど、
片方を755にすると、もう一方も755になってしまうという現象がおきます。
逆に705にしても同じです。
なんなんでしょうか。
とりあえずもう少しイジッてみてダメなら諦めます。
677さんと679さんありがとうございました。

**名無しさん＠お腹いっぱい。** · 02/02/16 20:13

C++でCGIを組みたいのですが、
それに関する良い参考書って無いですか？

**名無しさん＠お腹いっぱい。** · 02/02/16 20:42

>>683
必要ない。

環境変数の取得の仕方。
標準入力からのデータ取得。
標準出力へのデータ出力

ができればいい。

Perl用の参考書を軽く読めばできると思われ。
CGIの参考書と言っても中身はほとんど言語の使い方。

**名無しさん＠お腹いっぱい。** · 02/02/16 22:10

２ちゃんねるのような
フロート型掲示板を設置したいのですが
軽い物有りませんでしょうか？
megabbsはiswebでは無理でした。

**名無しさん＠お腹いっぱい。** · 02/02/16 22:11

>>685
規約に２ｃｈ型掲示板の禁止と無いか？
軽い重いは問題ではない。

**685** · 02/02/16 22:21

そうか！
規約読んでなかった！
megabbsはレス出来ても
スレ立てられなかった

**買物カゴ** · 02/02/16 22:27

インターネットショップのための
ＣＧＩ＆JavaScript（アングラーズネット）
という本にのっている
買物カゴのプログラムを見ているのですが、
最初のところがさっぱりわかりません。
クッキーを取得して１行ずつに名前をつけているようなのですが、
そのあとcount1 から count7 まで
数字をつけています。
これが、何を意味しているのか知りたいのですが・・・

**名無しさん＠お腹いっぱい。** · 02/02/16 22:42

>>688
ソースも見せずにまぁ・・・。

**名無しさん＠お腹いっぱい。** · 02/02/17 01:00

>688
その本ボクに買ってくれたら教えてあげるYO!

**名無しさん＠お腹いっぱい。** · 02/02/17 02:24

>>688
まあ待て、お前の態度次第では教えてやらんでもないぞ。
WinMXでオレ様にエロゲーを3、4本落とさせろ。そうすれば
教えてやってもよいぞ。

**買物カゴ** · 02/02/17 14:40

エロゲーありませんが・・・

$count1= 0;
$count2= 0;
while ($count1 <= 50 ){
$xx= @kazu[$count1];
&trans;
@kazu[$count1] = $xx;
if (@kazu[$count1] ne "") {
$H = 1*@kazu[$count1];
if ($H >= 1) {
$count2++;
$datareg1{$count2}="@shouhinnumber[$count1]*@shouhinmei[$count1]*@bikou[$count1]*@kakaku[$count1]";
$datareg2{$count2}="@kazu[$count1]";
}
}
$count1++;
}

foreach (split(/; /,$ENV{'HTTP_COOKIE'})) {
($key,$value) = split(/=/);
$count1= 1;
while ($count1 <= 20){
$shouhin = "shouhin$count1";
if ($key eq $shouhin) {
$shouhin{$count1}= $value;
@data = split(/::/, $shouhin{$count1});
$data1{$count1} = @data[0];
$data2{$count1} = @data[1];
}
$count1++;
}
}

**買物カゴ** · 02/02/17 14:47

スミマセン。行がそろってしまいました。再度

$count1= 0;
$count2= 0;
while ($count1 <= 50 ){
$xx= @kazu[$count1];
&trans;
@kazu[$count1] = $xx;
if (@kazu[$count1] ne "") {
$H = 1*@kazu[$count1];
if ($H >= 1) {
$count2++;
$datareg1{$count2}="@shouhinnumber[$count1]*@shouhinmei[$count1]*@bikou[$count1]*@kakaku[$count1]";
$datareg2{$count2}="@kazu[$count1]";
}
}
$count1++;
}

foreach (split(/; /,$ENV{'HTTP_COOKIE'})) {
($key,$value) = split(/=/);
$count1= 1;
while ($count1 <= 20){
$shouhin = "shouhin$count1";
if ($key eq $shouhin) {
$shouhin{$count1}= $value;
@data = split(/::/, $shouhin{$count1});
$data1{$count1} = @data[0];
$data2{$count1} = @data[1];
}
$count1++;
}
}

**買物カゴ** · 02/02/17 14:48

厨でスミマセン。
行頭を下げて、投稿する方法がわかりません。
あきらめました。とほほ。
ご迷惑をおかけしました。

**名無しさん＠お腹いっぱい。** · 02/02/17 15:07

著作権的に問題ないのか？
市販の書籍のコード晒すの。

**名無しさん＠お腹いっぱい。** · 02/02/17 18:57

配列要素の参照に@…？まさかッ！Perl6のコードかッ！

**名無しさん＠お腹いっぱい。** · 02/02/18 18:17

>>696
偶にいるんだよね、こーいうことしちゃう奴。
んでもスライス扱いになるから、意図した動きになるみたいよ。
だから、こーいう書き方したいなら、

($scalar) = @list[1];

とかって書いた方が気持ちよいけど。

**名無しさん＠お腹いっぱい。** · 02/02/19 04:59

>>692
そのソースだと，これくらいしかわからなかった。
@kazuを処理して， %datareg1と %datareg2に結果を入れてる。
そのあとクッキーを読んで，%data1と %data2に結果を入れてる。

**名無しさん＠お腹いっぱい。** · 02/02/19 11:49

改行を含んだ変数($tegami)があるんですが、
この変数を1行毎に処理したいのですがどうしたらいいのでしょうか？
while とか foeach とかでやろうと思っているのですが分かりません

**名無しさん＠お腹いっぱい。** · 02/02/19 11:51

>>699
while($data ne "")
{
$data =~ s/(.*?)\n//;
push(@data,$1);
}

**名無しさん＠お腹いっぱい。** · 02/02/19 11:52

>>700
ごめん。

$data -> $tegamiで。

**名無しさん＠お腹いっぱい。** · 02/02/19 12:21

>>700-701
速レスありがとうございました！
無限ループさせてしまっていました、、、
助かりました

**名無しさん＠お腹いっぱい。** · 02/02/19 12:34

>>700
役に立ったかな？

$data =~ s/^(.*?)\n//;

の方がより良いかも。

**名無しさん＠お腹いっぱい。** · 02/02/19 12:58

foreach ($tegami =~ /([^\n]*?\n)/g) {
　　chomp;
$_ ...
}
とか

**名無しさん＠お腹いっぱい。** · 02/02/19 14:59

A子さん　　　はじめまして
B子さん　　　どうも
A子さん　　　どうも

こんな感じでログファイルに保存してあったとして
B子さんの発言のみをログファイルから読み込んで
表示するにはどのように記載すればよいのでしょうか？

**Perl勉強中** · 02/02/19 15:13

open(OUT,"$logfile");
while(<OUT>){
@log=split/\t/;
if ($log[0]=B子さん){
print @log;
last;
}
}

かな？

**名無しさん＠お腹いっぱい。** · 02/02/19 15:16

>706
それだと、if文のところで、$log[0]がすべてB子さんに書き変わる。

**名無しさん＠お腹いっぱい。** · 02/02/19 15:18

>706
そして、それだと、Ｂ子さんが一回でてくるとそこで終了してしまう。

**名無しさん＠お腹いっぱい。** · 02/02/19 15:19

>706
さらに、openしたOUTはいつクローズしてもらえるかとうずうずしている。

**Perl勉強中** · 02/02/19 15:21

あれ？そうですか？
じゃぁ
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0]=B子さん){
print @hoge;
exit
}
}
でどうですか？

**Perl勉強中** · 02/02/19 15:22

B子さんが一つ以上あるなら
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0]=B子さん){
print "@hoge\n";
}
}
で

**名無しさん＠お腹いっぱい。** · 02/02/19 15:24

>710
だから、そのif文だと
もし($hoge[0]にＢ子さんを代入できたら)｛@hogeを出力して実行終了}
だろ？
@hoge[0]にＢ子さんを代入することを阻害する要因が何一つこれっぽっちもない以上
一行目の配列で終了だよ。

**名無しさん＠お腹いっぱい。** · 02/02/19 15:25

>711
いつ気付くんだろ・・・・

**Perl勉強中** · 02/02/19 15:26

B子さんが一つ以上あるなら
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq B子さん){
print "@hoge\n";
}
}

こうか？

**名無しさん＠お腹いっぱい。** · 02/02/19 15:26

>714
そうだ

**名無しさん＠お腹いっぱい。** · 02/02/19 15:27

「closeしろ」の意味を取り違えてる、とか
B子さんをクォートしなくても良いンか、とか。

**Perl勉強中** · 02/02/19 15:28

open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] == "B子さん"){
print "@hoge\n";
}
}
これでも良し？

**名無しさん＠お腹いっぱい。** · 02/02/19 15:32

んで、俺ならこうする。

open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file) {
@hoge = split(/\t/,$_);
if ($hoge[0] =~ /Ｂ子さん/) { print $_; }
}

**名無しさん＠お腹いっぱい。** · 02/02/19 15:33

>>717
文字にはeqじゃないの？　==でどうなるかわからんけど。
foreach内単に

print if (/^Ｂ子さん/);

ではダメなのだろうか？

OUTって名前が気持ち悪いのは俺だけ？

**名無しさん＠お腹いっぱい。** · 02/02/19 15:33

>717
それだとどうかしらん。

**名無しさん＠お腹いっぱい。** · 02/02/19 15:35

>719　
ぜんぜんおっけーっしょ？

**名無しさん＠お腹いっぱい。** · 02/02/19 15:43

そういやなんでOUTなんだ？普通INとかそれ系だろ。

**名無しさん＠お腹いっぱい。** · 02/02/19 15:44

open IN, "<$logfile" or die;
while(<IN>){
print if /^B子さん\t/;
}
close IN;

**705** · 02/02/19 15:51

>>706-723
こんない沢山のレスありがとうございました。
参考にさせて頂きます。

**705** · 02/02/19 15:51

こんない×
こんなに○
すいません間違えました。

**705** · 02/02/19 16:01

度々すみません。
追加の質問で
B子さんの名前の場所と
コメントの場所を調整するにはどうすればいいのでしょうか？

B子
どうも

こんな感じです。

**Perl勉強中** · 02/02/19 16:23

懲りずに挑戦
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq "B子さん"){
print "$hoge[0]<br>$hoge[1]<br>";
}
}
又は
open(OUT,"$logfile");
@file=<OUT>;
close (OUT);
foreach(@file){
@hoge=split/\t/;
if ($hoge[0] eq "B子さん"){
@hoge=~s/\t/<br>/g;
print "@hoge<br>";
}
}

でどうでしょ？

**名無しさん＠お腹いっぱい。** · 02/02/19 16:45

>>727
脳内で完結しないで試してから書き込むように。
#!perl
open IN, "<$logfile" or die;
while(<IN>){
if(/^B子さん\t/){
s/\t/<br>\n/;
print;
}
}
close IN;

**名無しさん＠お腹いっぱい。** · 02/02/19 17:05

>>728
s/^(Ｂ子さん)\t/\1<br>\n/;