トップページphp
1001コメント360KB

Perlコーディング初心者質問スレ Part 52

■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん2006/09/15(金) 14:01:51ID:gobry0n2
Perlのコーディングで困ってる人のスレです。

【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。

1: 自分はこういう事がしたい。
2: それでこんな風にやってみたが・・・
3: こんなエラーが出て上手く行かなかった。

最低でも1と3が無いと誰も答えられないよ。
ソース貼る時は、全角スペースでインデント忘れずに。
良い回答は良い質問から。一緒に勉強しましょう。

お勧めサイトは >>2-10

前スレ http://pc8.2ch.net/test/read.cgi/php/1153987463/
過去ログ倉庫 ttp://user.ftth100.com/mirrorhenkan/perl/
0402nobodyさん2006/10/10(火) 00:40:47ID:???
初歩的だと思うのですが質問させてください。

$hogeに1〜3の数字が入るのですが(「123」や「13」「2」だけのときもあります)
1がふくまれていたら「あか」、2が含まれていたら「あお」、3なら「きいろ」というような置換をしたいのですが、
s///; 1行でまとめて記述できますか?

できなければ
$hoge =~ s/1/あか/;
$hoge =~ s/2/あお/;
$hoge =~ s/3/きいろ/;
と書くしかないのでしょうか〜? 調べてみたのですがイマイチわかりません・・・。
0403nobodyさん2006/10/10(火) 00:43:08ID:???
>>402
無理。
0404nobodyさん2006/10/10(火) 00:51:10ID:???
!無理ですか・・・
即レスありがとうございました・・・orz
0405nobodyさん2006/10/10(火) 00:55:33ID:???
>>402
できる。 s///ge を使いなされ。
0406nobodyさん2006/10/10(火) 00:58:12ID:???
>>402
ごめん。準備に一行使ったので二行になっちゃった。

@colors = ('あか', 'あお', 'きいろ');
$hoge =~ s/([1-3])/$colors[$1 - 1]/eg;
0407nobodyさん2006/10/10(火) 01:00:49ID:???
$hoge =~ s/([1-3])/('あか', 'あお', 'きいろ')[$1 - 1]/eg;
04084062006/10/10(火) 01:03:57ID:???
>>407
あ、そうか。^^;
04094022006/10/10(火) 01:05:03ID:???
>>405-407
ありがとうございます!!
変換文字列が結構あるので助かりました〜〜!
0410nobodyさん2006/10/10(火) 02:41:09ID:???
>>406の方がいいと思うね。>>407はやりすぎ。
04114022006/10/10(火) 03:00:05ID:???
再びつまりました・・・。

$hogeに1〜3の数字が入るのですが(「123」や「13」「2」だけのときもあります)
if( $hoge =~ /1/){$check[1] = 'checked';}
if( $hoge =~ /2/){$check[2] = 'checked';}
if( $hoge =~ /3/){$check[3] = 'checked';}
これと同じようなことをできるだけ短い行でしたいのですが

ためしに
if ($c_hp =~ /([1-3])/){ $checked[$1] = 'checked';}
にしてみましたが、初めの数字しか反応しません・・・(あたりまえですが)
if以外を使えばいいのでしょうか、、、やり方が思いつきません。
04124022006/10/10(火) 03:12:46ID:???
↑$c_hp は $hoge の間違いで、さらに $checked は $check の間違いです・・・orz
0413nobodyさん2006/10/10(火) 03:36:42ID:???
$hoge =~ /$_/ and $check[$_] = 'checked' for qw(1 2 3);
とか
$check[$1] = 'checked' while $hoge =~ /([1-3])/g;
とか?
二番目のほうは同じ数字が複数回出てくる場合無駄が出るね
逆に一番目のほうは三回別のパターンで頭から調べなおしだから、
それ以外の場合では効率が悪そうな気がする。
04144022006/10/10(火) 03:57:19ID:???
>>413
ありがとうございました!!
同じ数字は複数出ない設定なので2番目のほう利用させていただきます!
0415nobodyさん2006/10/10(火) 08:49:57ID:???
>>405-407
おまえらハッシュの存在忘れてね? e なくてもできるほうがいいと思うんだが。

%colors = (1 => 'あか', ・・・);
$hoge = s/([1-3])/$colors{$1}/g;
0416nobodyさん2006/10/10(火) 10:39:50ID:???
>>415
ハッシュにしなくとも >>406 なら /e は要らない。
変数展開コンテキスト中でも配列の添え字やハッシュのキーには
式を使える。
0417nobodyさん2006/10/10(火) 11:06:28ID:???
うわ、ほんとだw しらんかったw
0418nobodyさん2006/10/10(火) 14:23:04ID:M4r4Q87U
すみません教えてください。

$REC1 = (1,2,3,4,5);
@test1=split(/\,/, $REC1);
for($i=0; $i<@test1; $i++){
@aaa = $test1[$i]
}
とすると、わたしのイメージでは$iが変化する度に$test1[0]から$test1[4]
が@aaaに12345と代入されていくと
思ったのですが実際は一文字しか表示されませんでした。
変数が変化する度に配列に入れていく方法はどうしたらできますか。
0419nobodyさん2006/10/10(火) 14:28:22ID:???
$REC1= '1,2,3,4,5';


push(@aaa, $test1[$i]);
0420nobodyさん2006/10/10(火) 14:53:37ID:M4r4Q87U
419さん

早速できてしまいました。
おかげさまです。ありがとうございました。
0421nobodyさん2006/10/10(火) 16:10:54ID:???
配列を別の配列に入れるのに添え字でループまわしてpushってしないだろ。
@aaa = @test1か@aaa=split ... で十分だと思うのだが。

ここで書いてない部分になにか必要な処理がはさまるのかもしれんけど。
0422nobodyさん2006/10/10(火) 17:40:59ID:???
C言語の配列のアドレスは
int型4バイトの場合s[1]のアドレス = s[0]のアドレス+4という風に
順当に増えていきますが、Perlの配列の場合どうなっているのでしょうか?
@c = (1,2,3);のとき
SCALAR(0x804c380)、SCALAR(0x804c464)、SCALAR(0x804c494)となりました。

それどころか自分で作ったあるプログラム中の配列では
$ref2 = \@$ref[2];
$ref3 = \@ref[3];
$ref2 = SCALAR(0x8063634)
$ref3 = SCALAR(0x8063610)という風にインデックスは増えているのに
アドレスの値は減ってしまいました。
0423nobodyさん2006/10/10(火) 17:59:24ID:???
気にしちゃいけません
0424nobodyさん2006/10/10(火) 18:23:51ID:???
その辺に興味があるのなら処理系のソース読むか「実用Perlプログラミング」(第2版じゃなくて
Sriram Srinivasanが書いた方)の20章「Perlの内部構造」を読むといい。

かいつまんでいると、Perlの配列はCのようにいろいろな型を要素にもった配列ではなくて、全て
Perlのスカラー型をあらわす構造体へのポインタの配列になっている。アドレス順に並んでる
のはこのポインタが並んだ部分だが、君がリファレンスとって見ているのはポインタが入ったハコ
のアドレスではなく、そこに入ったポインタがさした先のスカラーのアドレスなので、これがどういう
順番になっているかはPerlのメモリ割り当てシステムの気分しだい。
0425nobodyさん2006/10/10(火) 19:24:30ID:kpxOKRmy
youtubeのファイルを読み出してプレイヤーとサムネイルの表示がうまく出来ません。

http:// check 2ch.is.land.to/ 2chsea rcher.cgi?page=0&mobile=&view=10&category=youtube&keyword=&selecttype=all&TARGETADDRESS=http://pc7.2ch.net/streaming/dat/1155343107.dat



↑を保存してそれをhtmlで保存したもの はサムネイルが表示される!
http:// check 2ch .is.land.to/ testing.html


cgiからyoutubeファイルにアクセスするとサムネイルが取得できないのかと思って
上の保存したものを、ただcgiで吐き出すページでも サムネイルが表示できる

http:// check 2ch .is.land.to/ testing.cgi



なんで一番上のcgiだけサムネイルが表示されないか分かる方いたら教えてください。
0426nobodyさん2006/10/10(火) 19:32:45ID:???
上のとき、画像のプロパティで見れる画像のアドレスは何になってるん?
0427nobodyさん2006/10/10(火) 19:35:49ID:kpxOKRmy
>>426
アドレスとかタグに関して全く同じ記述なんです
0428nobodyさん2006/10/10(火) 19:38:04ID:kpxOKRmy
>>426

表示したての1ページ目は真っ黒でサムネイルは表示されず
2ページ目からはサムネイル表示されます

そして、また1ページに戻るをしたら1ページ目も表示される
なんででしょう^^;
謎すぎです
0429nobodyさん2006/10/10(火) 19:53:08ID:???
じゃーyoutube側で何かしてるとかじゃね?
情報少ないんでなんともいえないけど、違うのがアドレスだけ、ってことなら、
とりあえずその長いアドレスをどうにか直してみたら?
0430nobodyさん2006/10/10(火) 19:54:09ID:kpxOKRmy
>>429
一度
index.cgiに変えましたけど 同じでした
なのでソースの中身なのかもしれません。
0431nobodyさん2006/10/10(火) 20:12:14ID:???
とりあえずブラウザからyoutubeに対して同じリクエストを出しているかどうかを
切り分けた方がいいんじゃないか。
0432nobodyさん2006/10/10(火) 20:15:37ID:kpxOKRmy
>>431
どういう意味ですか?
何と何を切り分けるの?
0433nobodyさん2006/10/10(火) 20:22:15ID:???
>>432
で、どこがPerlの質問なの。
0434nobodyさん2006/10/10(火) 20:25:54ID:???
youtube話題は終了
去れ
0435nobodyさん2006/10/10(火) 20:39:31ID:???
>>434
お前みたいなキモいのがいるから俺らまで勘違いされちまうじゃねーか!
0436nobodyさん2006/10/10(火) 20:41:57ID:???
スレ違い指摘されただけでムキなるなやチョン
0437nobodyさん2006/10/10(火) 21:18:05ID:???
>>436
まぁまぁムキになるなよチンク
04384222006/10/10(火) 21:55:48ID:???
>>424
@a = (1,2,3);
と宣言した時点で1、2、3が適当なアドレスに振り分けられて
配列の要素の中にそのスカラー値へのポインタが格納されているのですかー
ありがとうございましたm(_ _)m
0439nobodyさん2006/10/11(水) 00:16:26ID:???
めんどくせーから youtube-dl でも落として、`youtube-dl` しとけ。
0440nobodyさん2006/10/11(水) 20:14:04ID:???
質問です。
アップローダーのCGIなどよくありますが、
これらにアップロード中の進行状況表示(転送速度あるいは転送済量)
を表示する機能を追加することが出来ないかと考えております。
javaなどの可能性も含めて
どなたか知恵を拝借させてください。
よろしくおねがいいたします。
04414062006/10/11(水) 20:46:56ID:???
>>411
すごい勢いで遅れたけどこれで。e にこだわる係。未テスト。
$c_hp =~ s/([1-3])/ $checked[$1] ||= 'checked'; ('あか', 'あお', 'きいろ')[$1 - 1] /eg;
0442nobodyさん2006/10/11(水) 20:59:56ID:???
>440
java アプレット
Flash (MX以降かも)
ActiveX

で実装可能
上から順番に汎用性は高いかと思う
0443nobodyさん2006/10/11(水) 21:00:39ID:???
>>440
javascriptかjavaかflashでも使えばなんとかなるかもしれん。
特に鯖側に機能はいらないのでそれらのスレで聞いたほうが
いいよ。

0444nobodyさん2006/10/11(水) 21:09:07ID:???
鯖側は通常のあぷろだスクリプトのままでOK(若干の手直しは必要かも)

まぁftp開けて転送しちゃうのも手
0445nobodyさん2006/10/11(水) 21:40:36ID:???
Ajax
04464402006/10/12(木) 02:52:06ID:???
多くのレスありがとうございます。
やはりjavaが実用的かと思うので
試行錯誤してみたいと思います
ありがとうございました。
0447nobodyさん2006/10/12(木) 13:35:56ID:???
mod_uploader
0448nobodyさん2006/10/12(木) 13:58:23ID:???
ご主人様?
0449nobodyさん2006/10/12(木) 14:23:54ID:???
mod_uploaderが原因不明の暴走起こして
apacheはもちろん
全てのサービスが通信不能になった私が来ましたがなにか。
ちなみに原因判明まで1週間もかかった自分も自分だがなorz
0450nobodyさん2006/10/12(木) 16:14:36ID:???
>>449
怖くて使えない自分よりも漢だ。
元気出せ!
0451nobodyさん2006/10/12(木) 21:29:47ID:???
snアップローダを使用しているのですが、
投稿者がファイルをアップするとIPなどのログが記録されるのですが、
投稿者がアップしたファイルを削除するとログも削除されてしまいます。

ファイルを削除した時にログが削除されないようにするにはどこを変更したらいいのでしょうか?
よろしくお願いします。

snアップローダ
ttp://sugachan.dip.jp/download/uploader.php
0452nobodyさん2006/10/12(木) 21:54:06ID:???
>>451
スレ違い。こちらへドゾー

【 スクリプト改造依頼スレ 】(丸投げ) part6
ttp://pc8.2ch.net/test/read.cgi/php/1157787046/
04534512006/10/12(木) 22:04:51ID:???
>>452
失礼しました
移動します
0454nobodyさん2006/10/12(木) 22:49:49ID:???
ヒアドキュメント内でコメントアウトすることできますでしょうか?
0455nobodyさん2006/10/12(木) 23:02:48ID:???
>>454
Perl処理系が認識するコメントにはできないが、ヒアドキュメントで得られた文字列を適当に加工する
コードを追加する、という手はなくもない。


print strip_comment(<<FOO);
hoge
# hoge
hogehoge # hoge
FOO

sub strip_comment {
my($s) = @_;

$s =~ s/\s*#.*$//gm;

return $s;
}


0456nobodyさん2006/10/12(木) 23:16:34ID:???
>>454
答えようとしたら同ネタが既に出てたので正規表現だけ。
$s =~ s/(^)?[\t ]*#.*(?(1)\n)//gm;

>>455
大昔にベンチ取った時、サブルーチン末で値を返す場合は
陽に return しない方が有為な差が出る程度に速かったんだけど、
今の環境だとどうなんだろうね。興味あったら計ってみて下さい。
0457nobodyさん2006/10/12(木) 23:29:52ID:???
変に最適化するより分かりやすいコードを書く方がいいと思うなぁ
0458nobodyさん2006/10/12(木) 23:48:01ID:???
そんな処理速度が問題になるようなところはXSで書けばいいのに。
0459nobodyさん2006/10/12(木) 23:58:15ID:???
>>458
XSってなんでしょう…。
XSSなら知ってますが、XSなんて聞いたことないですね〜。
0460nobodyさん2006/10/13(金) 00:09:26ID:???
>>449
ご主人様と呼ばれて喜んでいるようなキモい人間が書いたソフトを
よく自分のマシンで動かせたね。w
0461nobodyさん2006/10/13(金) 00:09:28ID:???
ググれ
0462nobodyさん2006/10/13(金) 00:47:42ID:???
>>455-456
サンクス。
0463nobodyさん2006/10/13(金) 22:52:20ID:???
引数みたいにしてある @ は何でしょうか?

sub md5_hex(@) {
unpack 'H*', &md5;
}
0464nobodyさん2006/10/14(土) 01:07:07ID:???
>>463
perlsub の Prototypes 参照。
0465nobodyさん2006/10/14(土) 10:12:43ID:???
>>464
引数の型を定義しているということですか。
サンクス。
0466nobodyさん2006/10/15(日) 22:29:10ID:???
掲示板での投稿の処理で現在
$FORM{$name} = $value
でフォーム内容をわけていますが、
hp だけ情報を結合したいのですが

if($name eq 'hp'){$FORM{'hp'} .=$value;}
else{$FORM{$name} = $value;}

としてみましたがうまく動きません。(hpの最後の情報だけ取得されます)

if($name eq 'hp'){$FORM{'$name'} .=$value;}
else{$FORM{$name} = $value;}

としてみても結果は同じです(当たり前ですが・・・)
どのようにすればいいのでしょうか。orz
0467nobodyさん2006/10/15(日) 23:41:25ID:???
>>466
そのコードにおかしい所はない
04684662006/10/15(日) 23:57:14ID:???
レスありがとうございます・・・(・ω・`)
しかし、思いのとおりに入っていないのですが…
ちなみにhpの指定をせずに $FORM{$name} .= $value; にすると
ちゃんとhpに連結したデータが入ることは確認しています。。
0469nobodyさん2006/10/16(月) 00:04:58ID:???
たぶん、 $name が純粋に 'hp' ではないんじゃないかな。
後ろにスペースが入ってるとか、改行がついてるとか、大文字小文字が違うとか。

if($name =~ /\bhp\b/i){$FORM{$name} .=$value;}
else{$FORM{$name} = $value;}

だとどう?
04704662006/10/16(月) 00:20:30ID:???
>>469
できました・・・!!
=~ //i はわかるのですが、\bは何を意味するのか
調べてみたのですがいまいちわかりません…!
よければなんと言う呼び名か教えていただけませんか?
自分で調べたいので…!
0471nobodyさん2006/10/16(月) 00:42:19ID:???
>>470
動いたようでよかったです。
\b は正規表現での単語境界を表すメタシンボルです。
0472nobodyさん2006/10/16(月) 00:42:18ID:???
>>470
できたのかよw
>>468 の現象を見ると >>469 でもできなそうだと踏んだのになあ。
04734662006/10/16(月) 00:49:49ID:???
ちなみに/iは無くてもできましたが、>>469を使うと
後にでてくる
if ($FORM{'hp'} !~ /[1-5]/){&error("hpwo選択してください");}
が反応しなくなってしまいました…。
>>468の場合だと動いていました)
hpには1から5の数値がランダムで入るのですが…
連投すいません。
0474nobodyさん2006/10/16(月) 00:57:33ID:???
>>473
そのコードだと、

> hpには1から5の数値がランダムで入るのですが…

が真である限り、$FORM{'hp'} !~ /[1-5]/ は必ず偽になるため &error() が実行される事はありません。
そういうことではなくて?
04754662006/10/16(月) 01:01:49ID:???
>>474
あぁ、書き方がわるかったです、申し訳ない!
必ず偽になるようにテストしているのですが
&error() が返されてしまうのです。
0476nobodyさん2006/10/16(月) 01:03:41ID:???
あー、そういう風に使うつもりなら $name からスペースや改行などをとりのぞいて小文字で統一するなりして
ちゃんと 'hp' になるようにしたほうが、バグにはならないね。chomp、s///、lcとかでやってみて。

てか、条件の後出しはやめましょう。
04774662006/10/16(月) 01:07:01ID:???
>>476
そうですね、色々ややこしくなってそうです。
改めて内容の見直ししてみます。
>>466の状態でできていれば問題なかったのですが・・・(・ω・`)
レスありがとうございました。助かりました。
0478Perl初心者の中学生2006/10/16(月) 19:34:27ID:1M63qM8/
はじめまして。PerlでCGIを作成したのですが疑問があったので質問にきました。
スレ違いなら誘導してくれるとありがたいです。
質問の内容はカウンターを作っていたのですが、作成途中にできた二つのソースが
同じ内容なのに動作に違いがあることに気づき、原因がわからない。ということです。
以下のソースを見てください。
http://love.meganebu.com/~freedomworld2006/count.txt
このソースはCGI形式にして実行すると、
<img src="img/0.png" alt="0> <img src="img/0.png" alt="0> <img src="img/0.png" alt="0> <img src="img/1.png" alt="1>
と、そのまんまブラウザに表示されてしまいます。ですがカウントはしているようです。
http://love.meganebu.com/~freedomworld2006/count2.txt
しかし、こちらは上の失敗したソースと同じなのにちゃんと画像が表示され動作します。
違いといったら半角のスペースや改行があるかないかです。
なんでこんなことが起こるのか全くわかりません。ちなみにインタプリンタパスは省略してあります。
わかる方、どうか教えてください。お願いします。
0479nobodyさん2006/10/16(月) 20:07:39ID:???
今帰宅中だから帰ったら見てみるよ
0480nobodyさん2006/10/16(月) 20:13:00ID:???
>>478
count.txt 19行目:
 alt=\"$n\>\n";
count2.txt 18行目:
 alt=\"$n\">\n";
0481nobodyさん2006/10/16(月) 20:48:00ID:???
>>480
やはりソースミスでしたか・・・こういうのは人に言われて初めて気づくんですよね・・・。
ご指摘ありがとうございました。
本当に助かりました。
0482nobodyさん2006/10/16(月) 23:51:46ID:ZHxCJrpx
すみません。ネットショップを運営してるのですが、
掲示板とショッピングカートはレンタルのサーバーをかりて、
HPからリンクして使っています。ところが掲示板荒らしで困っています。
改行を繰り返し、とても見にくくて、アクセス拒否してもネットカフェなどから
投稿してきたりで、どうしようもありません。
文字数の制限は設定サービスにあるのですが改行制限はサービスにないといわれ、
$value =~ s/\r\n/<BR>/g;
$value =~ s/\r/<BR>/g;
$value =~ s/\n/<BR>/g;
$value =~ s/(<BR>){5,}//g;

これを使えと言われたのですが、本当に初心者でよくわかりません。

サーバーを代えたほうが早いですか??
0483nobodyさん2006/10/17(火) 00:14:01ID:???
てーか、ショップってことは掲示板とかもどこかに作ってもらったものなんでしょ?
そのひとが 「改行制限はサービスにない」 とかゆってんの? ワロスww
そしてこれを使えの例がひどくてさらにワロスwww

参考までに作者のサイトおしえてください><

〜.cgi のソース内を 「$value =~ s/\r/<BR>/g;」 で検索すればそれっぽいとこがあるから追加すればいいんじゃない? kwskはわからんけど
あとサーバ変えても同じだと思うんだけど。
0484nobodyさん2006/10/17(火) 00:25:20ID:???
えっと、作ってもらったんじゃなくて掲示板をかりています。
ttp://advenbbs.net/

ここのです。

$value =~ s/\r\n/<BR>/g;
$value =~ s/\r/<BR>/g;
$value =~ s/\n/<BR>/g;
$value =~ s/(<BR>){5,}//g;


コレを使えと言ったのは、元PCの先生なんですが。

なんか、自分が無知すぎて恥ずかしいので、
他に対策をとってみます。

すぐレス下さり本当に有難うございました。
まずは、勉強してみます。

0485nobodyさん2006/10/17(火) 00:44:46ID:???
うすうすそうかとは思っていたが・・・

>ベースはKENT-WEBの人気レス式アイコン掲示板YY-BOARDで見た目も使いやすさはバツグン!

(ノД`)アチャー
0486nobodyさん2006/10/17(火) 00:46:25ID:???
まあ、「レンタル掲示板」 じゃソース書き換えもできないので、
他の、しっかり対応してくれるとこから借りるのをオススメしますー。
0487nobodyさん2006/10/17(火) 00:54:00ID:???
有難うございました
m(__)m

PS.なんでみなさん、IDが???なんでしょう???
0488nobodyさん2006/10/17(火) 10:22:16ID:???
>>481
普通はdiffとるから、自ら気付く。
0489nobodyさん2006/10/17(火) 13:31:46ID:???
動作が違うなら内容が違う→同じかどうかチェック→diffって流れね、たぶん。
0490nobodyさん2006/10/17(火) 15:22:14ID:???
diffとは何でしょうか。
調べてみたのですがよくわからない部分もあったのです。
できたらやり方を教えてくれませんか?
0491nobodyさん2006/10/17(火) 15:23:22ID:???
>>490
>>調べてみたのですがよくわからない部分もあったのです。

調べてみたのですがよくわからない部分もあったので。
に訂正します。。。
0492nobodyさん2006/10/17(火) 15:26:48ID:???
「diff コマンド」
0493nobodyさん2006/10/17(火) 15:32:39ID:???
>>492
コマンドプロンプト使うんですか?
0494nobodyさん2006/10/17(火) 15:36:53ID:???
>>493
windowsには付属してないから、diffとかでぐぐってwindowsで使えるそれっぽいのを使ってみるといいよ
0495nobodyさん2006/10/17(火) 16:17:37ID:???
某秀○とかでも内容比較できるけどスレ違い
0496nobodyさん2006/10/17(火) 19:57:46ID:???
>>490
目視でのチェックは必ず見落とすからdiffというプログラムを使って比較する。
Windowsだったら、FCというコマンドがある。MSDOSの頃からある古いプログラムだけど、
目視より100万倍まし。

コマンドプロンプトで
fc file1 file2
0497nobodyさん2006/10/17(火) 22:20:48ID:???
>>490
いっそ Perl で書いてしまえ。
0498nobodyさん2006/10/17(火) 22:59:43ID:???
>>497
http://search.cpan.org/~rbs/Text-Diff-0.35/
04994972006/10/17(火) 23:55:16ID:???
>>498
あ、……ああ、ほら、練習も兼ねて、な?
0500nobodyさん2006/10/18(水) 00:00:02ID:???
> あ、……ああ、ほら、練習も兼ねて、な?

ゴミ生産して何かいいことあんの?
0501nobodyさん2006/10/18(水) 00:08:11ID:???
それなりに経験になる。
■ このスレッドは過去ログ倉庫に格納されています