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

**nobodyさん** · 2006/05/31(水) 04:32:28

Perlのコーディングで困ってる人のスレです。

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

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

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

過去ログやお勧めサイトは >>2-10

**nobodyさん** · 2006/05/31(水) 04:33:02

関連スレ
CGI: Common Gateway Interface part 13
http://pc8.2ch.net/test/read.cgi/php/1126436361/

【Perl,CGI】参考書籍第三版
http://pc8.2ch.net/test/read.cgi/php/1030209573/

【Perl】ファイルロック(排他処理)について語ろう
http://pc8.2ch.net/test/read.cgi/php/1024795138/

★負荷軽減対策委員会（Perl、PHP)★
http://pc8.2ch.net/test/read.cgi/php/1034645635/

Perlモジュールについて
http://pc8.2ch.net/test/read.cgi/php/997829243/

CGIに依存しないPerlの話題一般/Part2
http://pc8.2ch.net/test/read.cgi/php/1030548610/

★三　【スクリプト改造工房 PART 9 】　★三
http://pc8.2ch.net/test/read.cgi/php/1143834740/

【スクリプト改造依頼スレ】(丸投げ) part5
http://pc8.2ch.net/test/read.cgi/php/1141174205/

**nobodyさん** · 2006/05/31(水) 04:35:21

［過去ログ] 1 of 4

Part1　http://tako.2ch.net/test/read.cgi?bbs=perl&key=957208980　参照不能
　DAT: http://tako.2ch.net/perl/dat/957208980.dat
Part2　http://tako.2ch.net/test/read.cgi?bbs=perl&key=971817087　参照不能
　DAT: http://tako.2ch.net/perl/dat/971817087.dat
Part3　http://tako.2ch.net/test/read.cgi?bbs=perl&key=979894521　参照不能
　DAT: http://tako.2ch.net/perl/dat/979894521.dat
Part4　http://tako.2ch.net/test/read.cgi?bbs=perl&key=984430156　参照不能
　DAT: http://tako.2ch.net/perl/dat/979894521.dat
Part5　http://pc.2ch.net/php/kako/988/988728069.html
Part6　http://pc.2ch.net/php/kako/996/996075607.html
Part7　http://pc.2ch.net/php/kako/1000/10002/1000267444.html
Part8　http://pc.2ch.net/php/kako/1003/10039/1003900311.html
Part9　http://pc.2ch.net/php/kako/1009/10095/1009549309.html
Part10 http://pc.2ch.net/php/kako/1014/10145/1014556702.html

**nobodyさん** · 2006/05/31(水) 04:36:16

**nobodyさん** · 2006/05/31(水) 04:37:00

［過去ログ] 3 of 4

part21 http://pc2.2ch.net/php/kako/1047/10479/1047980851.html
part22 http://pc2.2ch.net/php/kako/1050/10503/1050369328.html
part23 http://pc2.2ch.net/php/kako/1053/10530/1053051519.html
part24 http://pc2.2ch.net/php/kako/1054/10549/1054992610.html
part25 http://pc2.2ch.net/php/kako/1056/10567/1056730690.html
part26 http://pc5.2ch.net/php/kako/1059/10590/1059043704.html
part27 http://pc5.2ch.net/php/kako/1060/10608/1060808783.html
part28 http://pc5.2ch.net/php/kako/1063/10635/1063562491.html
part29 http://pc5.2ch.net/php/kako/1066/10662/1066286828.html
part30 http://pc5.2ch.net/test/read.cgi/php/1069846177/

**nobodyさん** · 2006/05/31(水) 04:37:37

**nobodyさん** · 2006/05/31(水) 04:38:17

**nobodyさん** · NG

ム板Perlスレより 1 of 2

[プログラミング自体の経験が無い奴はまずココを読め]
Perlプログラミング講座: http://www.site-cooler.com/kwl/perl/

[本]
リャマ: http://www.oreilly.co.jp/books/4873111269/
駱駝: http://www.oreilly.co.jp/books/4873110963/
Effective Perl: http://www.ascii.co.jp/books/detail/4-7561/4-7561-3057-7.html
クックブック: http://www.oreilly.co.jp/books/4873112028/

[オンラインマニュアル] (追加)
最新のドキュメント: http://search.cpan.org/~nwclark/perl-5.8.7/
perl5.8.xのドキュメント(一部): http://www.kt.rim.or.jp/~kbk/perl-5.8/
perl5.005_03 のドキュメント: http://www.kt.rim.or.jp/~kbk/perl5.005/
日本語ドキュメント検索: http://www.cpan.jp/search.cgi
perldoc.jp: http://www.perldoc.jp/
Perldoc.com: http://www.perldoc.com/

**nobodyさん** · NG

ム板Perlスレより 2 of 2

[モジュール]
CPAN.com: http://search.cpan.org/
河馬屋二千年堂: http://homepage3.nifty.com/hippo2000/

[テクニック]
Perlメモ: http://www.din.or.jp/~ohzaki/perl.htm
Perlのページ: http://homepage1.nifty.com/nomenclator/perl/
Perlの小技: http://homepage3.nifty.com/hippo2000/perltips/index.htm

[Perl5.8Unicodeメモ]
http://www.pure.ne.jp/~learner/program/Perl_unicode.html
http://www.namazu.org/~tsuchiya/perl/perl-5.8.html
http://www.lr.pi.titech.ac.jp/~abekawa/perl/perl_unicode.html

**nobodyさん** · 2006/05/31(水) 06:57:08

>>1-9
乙

**前スレ992** · 2006/05/31(水) 07:10:12

前スレ998
ありがとうございます。euc-jpにエンコードすればいいことがわかりました。
jcode.plを使い&jcode::convert(\$str, "euc");のようにしてエンコードしたところ正しく表示されました。
本当にありがとうございます。情報が小出しで申し訳ありませんでした。

**nobodyさん** · 2006/05/31(水) 08:08:01

前スレ・・・寝てる間に変な流れで終わってゆ(´；ω；`)

**nobodyさん** · 2006/05/31(水) 10:34:09

とりあえずおっぱいうｐ

**nobodyさん** · 2006/05/31(水) 12:55:08

>>13
> とりあえずおっぱいうｐ
http://search.cpan.org/perldoc?Acme::Oppai

**nobodyさん** · 2006/05/31(水) 13:59:38

恥さらしだからこんなことするなよ。アホ。

**nobodyさん** · 2006/05/31(水) 14:06:05

こんなのあったのかｗｗｗ

**nobodyさん** · 2006/05/31(水) 17:57:14

$a = "a,b,c,d,";
という１つの文字列を元に
@b=(a,b,c,d,);
のような配列に代入する方法はないでしょうか？

**nobodyさん** · 2006/05/31(水) 18:06:09

split

**nobodyさん** · 2006/05/31(水) 18:07:54

初心者とはいえ少しは勉強しようよ・・・

**nobodyさん** · 2006/05/31(水) 18:47:06

でも、クックブックみたいな逆引き系マニュアル持ってないと
まず目的ありきの時に、どの関数・どのモジュールを使えばいいかわからないよね

オライリー有用だけど高いよ('A`)　貢ぎましたけど・・・

**nobodyさん** · 2006/05/31(水) 18:53:43

つぐぐる

**nobodyさん** · 2006/05/31(水) 18:57:04

>>21
ｱｰｯ!!　　　　　　　　　　いや　　　ほら　　　　クックブック　　あると　便利よ・・・　　うん

**nobodyさん** · 2006/05/31(水) 19:08:04

HTTPレスポンスヘッダに206を指定しファイルをCGI経由でDL
させようとすると、500エラーが出てしまいます。
具体的には下記のようにしております。

print "HTTP/1.1 206 Partial Content\n";
print "Last-Modified: Wed, 24 May 2006 18:41:30 GMT\n";
print "Pragma: no-cache\n";
print "Accept-Ranges: bytes\n";

my $range = $ENV{'HTTP_RANGE'};
if($range =~ m/^bytes=(\d+)\-(\d+)$/){
my $offset = $1;
my $end = $2;
my $len = $end - $offset + 1;

print "Content-Range: bytes $offset-$end/$len\n";

$filesize = $len;
}

print "Content-Length: " . $filesize . "\n";
print "Content-Type: $content_type\n\n";

print while(<IMG>);
close(IMG);

エラー内容は「Bad header=HTTP/1.1 206 Partial Content」ですので
これを外せばエラーは出ないのですが、206を返す手段があれば
ご教示いただきたく思っております。
宜しくお願いいたします。

**nobodyさん** · 2006/05/31(水) 19:29:32

>>23
Status ヘッダ
http://www.nilab.info/docs/cgi/draft-coar-cgi-v11-03-clean-jp.html#7.2.1.3

以後 CGI の話は以下のスレへ。
CGI: Common Gateway Interface part 13
http://pc8.2ch.net/test/read.cgi/php/1126436361/

**nobodyさん** · 2006/05/31(水) 19:45:57

>>24
すみません。
誘導先で質問させていただきました。有難うございました。

**nobodyさん** · 2006/05/31(水) 20:06:46

投稿されたテキスト本文の最後に、無駄な空白と改行が入っている
場合、これを取り除いて別の著名などを挿入したいのですが
取り除くにはどうしたらいいか教えてください

**nobodyさん** · 2006/05/31(水) 20:18:04

>>26
$text =~ s/\s+$/$chomei/s;
別の著名ってなんだ？

**nobodyさん** · 2006/05/31(水) 20:25:57

>>27
有り難うございます
日付、新規なのか更新（修正）なのかです
本文の最後に付けると見栄えが良いので

**nobodyさん** · 2006/05/31(水) 20:29:54

>>28
本文の最後に空白がない場合にも著名を挿入したい場合は、
$text =~ s/\s*$/$chomei/s;
な。それから、著名でなくて署名じゃないのか？

**nobodyさん** · 2006/05/31(水) 20:31:16

>>20
クックブックの方が便利なの？
これ↓を買おうと思っているんだけど。。

Perl/CGI逆引き大全 600の極意
http://www.amazon.co.jp/gp/product/4798010774/

**nobodyさん** · 2006/05/31(水) 20:31:30

すみません

**nobodyさん** · 2006/05/31(水) 21:14:12

>>17
@b = eval $a;
で万全。