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

**nobodyさん** · 04/10/07 23:23:08

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

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

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

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

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

**nobodyさん** · 04/10/07 23:28:34

関連スレ
CGI: Common Gateway Interface part 11
http://pc5.2ch.net/test/read.cgi/php/1055597189/
【Perl,CGI】参考書籍第三版
http://pc5.2ch.net/test/read.cgi/php/1030209573/
★三　【スクリプト改造工房 PART 8 】　★三
http://pc5.2ch.net/test/read.cgi/php/1077525387/
【スクリプト改造依頼スレ】(丸投げ) part2
http://pc5.2ch.net/test/read.cgi/php/1092304968/
△▲　WebProg 初心者の質問 Part10　▼▽
http://pc5.2ch.net/test/read.cgi/php/1095633323/
【Perl】ファイルロック(排他処理)について語ろう
http://pc5.2ch.net/test/read.cgi/php/1024795138/
★負荷軽減対策委員会（Perl、PHP)★
http://pc5.2ch.net/test/read.cgi/php/1034645635/
【Perl】掲示板を使ろう！
http://pc5.2ch.net/test/read.cgi/php/988890976/
Perlモジュールについて
http://pc5.2ch.net/test/read.cgi/php/997829243/
CGIに依存しないPerlの話題一般/Part2
http://pc5.2ch.net/test/read.cgi/php/1030548610/

**nobodyさん** · 04/10/07 23:29:28

**nobodyさん** · 04/10/07 23:30:33

**nobodyさん** · 04/10/07 23:33:11

ム板Perlスレより

[プログラミング自体の経験が無い奴はまずココを読め]
Perlプログラミング講座: http://www5a.biglobe.ne.jp/~n_rieko/perl/

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

[オンラインマニュアル]
Perldoc.com: http://perldoc.com
perldoc.jp: http://perldoc.jp
perl5.005_03 のドキュメント: http://www.kt.rim.or.jp/%7ekbk/perl5.005/

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

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

**nobodyさん** · 04/10/07 23:34:58

補足

コーディング　【coding】

プログラミング言語を使ってソフトウェアの設計図にあたるソースコードを作成すること。
（e-Wordsより）

自分の質問がPerlに関することなのか、
それともPerlではなくCGIやHTMLについてなのかを切り分けした上で、
質問して下さい。

**nobodyさん** · 04/10/07 23:39:18

だれも言わないから言っとく。

>>1 乙かれー

**nobodyさん** · 04/10/07 23:39:26

前スレ1氏より

http://www.geocities.co.jp/SiliconValley/5656/
http://www.hyuki.com/writing/techask.html

これはMLでの作法ですが、BBSでの質問にも当てはまると思います。
例え匿名でも、回線の向こうに居るのはあなたと同じただの人ですよ。

**nobodyさん** · 04/10/07 23:40:21

あと何かないかな。

WikipediaのPerlの項目
http://ja.wikipedia.org/wiki/Perl

**nobodyさん** · 04/10/07 23:44:13

前スレの>>1は文章自体は別に構わないと思うけど、前スレ>>987の意見を考慮して
以前の>>1に戻しました。

**nobodyさん** · 04/10/08 00:27:11

>>1乙。シャラポアマンセー

**nobodyさん** · 04/10/08 00:40:34

人によってコードの書き方は色々だと思うのですが、
一般的に美しいとされるコードの書き方はどのような書き方ですか？
参考になるようなソースがあればお教えください。

**nobodyさん** · 04/10/08 01:16:04

>>12
http://perldoc.com/perl5.8.4/pod/perlstyle.html
http://perldoc.jp/docs/perl/5.8.0/perlstyle.pod
http://www.kt.rim.or.jp/%7Ekbk/perl5.005/perlstyle.html

12 · 04/10/08 02:14:31

どうもありがとうございます。
しかしながら、見た目の美しさではなく、
コードを後から読む人にとって、
直感的に、わかりやすいコードという意味で、美しいといいました。
誤解を招く言い方でスイマセンでした。

**nobodyさん** · 04/10/08 03:17:19

>>14
perlstyle にはそういう意味で美しくする為の Tips も載っているだろ?

より具体的に知りたければ、自分の書いたコードをコードレビュー系の
ML なりスレなりに投下してごらん。偏った意見が聞けて面白いよ。
http://pc5.2ch.net/test/read.cgi/php/1049514428/

12 · 04/10/08 03:46:07

スレに投下作戦で行こうと思います。
参考になりました。どうもありがとう。

**nobodyさん** · 04/10/08 03:58:51

>>1
スレ建て乙

>>14
>コードを後から読む人にとって
それだったら、コーディング標準に従ったコード >>13のURL参照
独自ルールだとどうしても*自分にとって*美しいコードになってしまうことがあるので

質問の意図からすると、
設計の簡潔さ、適切なサンプルコード/ドキュメント(POD)を重視した方がいいんじゃないかな
場合によってはコードを読まずにすませられることもあるよ。

**nobodyさん** · 04/10/08 09:25:10

文字列の中に関数を直接展開するにはどうすればいいのでしょうか？
シェルスクリプトでいうところの↓みたいなことがしたいんですが
echo "current dir is `pwd`"
以前このスレで教えてもらったのですがやり方を忘れてしまいました
ログもググってみたんですが見つかりませんでした

**nobodyさん** · 04/10/08 11:14:19

print "current dir is " .`pwd`;

これが高速だし読みやすいのでお勧めだが…
(printに関して言えば、ピリオドよりコンマの方が良いが)

print "current dir is ${\`pwd`}";
print "current dir is ${\do{ `pwd` }";
print "current dir is @{[ `pwd` ]}";

ま、こんな感じで。

**nobodyさん** · 04/10/08 14:50:00

モジュールを使うことがオブジェクト指向ということになるんでしょうか？

**nobodyさん** · 04/10/08 15:16:43

>>20
全然違います。
モジュールとオブジェクト指向に直接関連はありません。

**nobodyさん** · 04/10/08 16:02:04

プログラム実行中にperlでエラーメッセージを
別ウィンドウを使って表示することは可能でしょうか。
javascriptを使えばできるようなのですが、
perlのみでは無理なのでしょうか？
スレ違いなら申し訳ないです。

12 · 04/10/08 16:09:32

>17
どうもありがとうございます。

>>コードを後から読む人にとって

>設計の簡潔さ、適切なサンプルコード/ドキュメント(POD)を重視した方がいいんじゃないかな
>場合によってはコードを読まずにすませられることもあるよ。

ところで、ＰＯＤとは、コメントのことでしょうか？
コメントだとしても、コードを読まずに済ませられるとは考えにくいので
違う気もします。宜しけれご教授ください。

**nobodyさん** · 04/10/08 16:28:01

>>22
スレ違いもしくは板違い。
http://pc5.2ch.net/hp/
http://pc5.2ch.net/test/read.cgi/php/1095633323/

>>23
http://perldoc.com/perl5.8.4/pod/perlpod.html
http://perldoc.com/perl5.8.4/pod/perlpodspec.html
http://perldoc.jp/docs/perl/5.6.1/perlpod.pod
http://www.kt.rim.or.jp/%7Ekbk/perl5.005/perlpod.html

**nobodyさん** · 04/10/08 16:39:18

sendmailでメール送るときにccとかってどう書けばいいですか？

open MAIL ,"| /usr/sbin/sendmail -t";
print MAIL "From: ".'"ほげほげ" <info@2ch.net>'."\n";
print MAIL "To: ".''."\n";
print MAIL "Cc: ".'<test@test.jp> <hoge@hoge.net>'."\n";
print MAIL "Bcc: ".''."\n";
print MAIL "Subject: ".""."\n";
print MAIL "\n";
print MAIL "test";
close MAIL;

みたいにしても動作しませんでした。
もちろん普通にtoだけいれたら動作します。
どなたかお願いします。

**nobodyさん** · 04/10/08 17:35:29

スパムに使われそうだから、回答しないわ

**nobodyさん** · 04/10/08 17:47:14

>>23
> ところで、ＰＯＤとは、コメントのことでしょうか？
> コメントだとしても、コードを読まずに済ませられるとは考えにくいので

PODは、コメントと言うよりは、ドキュメントと言った方が適切かもしれない。

Perlの標準モジュールの多くは慣習的に、
モジュールの説明、そのモジュールの使い方(実際に動く最小限のコード)
関数/メソッドのリファレンス、... などを含んでいるので
たとえば、◯◯をしたいといったとき、
PODにそのサンプルが載っていれば内部実装のコードを読む必要はない。
(デバッグで必要になる時までは...)

12 · 04/10/08 18:01:20

>24 >27
どうもありがとう。色々コード＆ＰＯＤ読んでみます。
精進します。ありがとう。

25 · 04/10/08 18:25:06

>>26
spamに使うならID出しませんよ。

どなたか>>25の回答をお願いしますm(__)m

**nobodyさん** · 04/10/08 18:26:49

>>26
ソンナコトイッタラナンデモソウジャナイカｗ

ウイルス作成に使われそうだから、このスレ閉じるか？

**nobodyさん** · 04/10/08 18:38:42

>>25
open MAIL ,"| /usr/sbin/sendmail -t";
print MAIL "From: ほげほげ <info@2ch.net>\n";
print MAIL "To: \n";
print MAIL "Cc: <test@test.jp>,<hoge@hoge.net>\n";
print MAIL "Bcc: \n";
print MAIL "Subject: スレ違い\n";
print MAIL "\n";
print MAIL "Ccでアドレス列記はperlには関係することではない";
close MAIL;

**nobodyさん** · 04/10/08 19:01:26

IDなんて飾りですよ

350235005336290 · 04/10/09 17:26:34

節穴とどっちが個人特定性が高いだろうか

**nobodyさん** · 04/10/09 18:07:02

>>33
その節穴ってどうなってんの？

個人特定性は節穴の方が高いでしょ。ID衝突は時々見かける。

**nobodyさん** · 04/10/09 19:46:27

ログが100行を越した場合最後の1行を残してあとのログが消えるようにしているのですが
ログが10行を越したときに1行だけ残してあとのログが消えるようにするのとどっちが負荷が低いのでしょう＿？
つまり、頻繁にログを1行にするのと、100行ものログを読みこむのと、どちらが負荷がかかるんでしょう。

**nobodyさん** · 04/10/09 19:51:25

>>35
自　分　で　試　し　ま　し　ょ　う　。

use べんちまーく;

**初心者です。** · 04/10/09 20:26:36

フリーの掲示板の設置が上手く出来たのですが、スクリプトの改造で
以下の戻り先URLの設定でターゲットの設定は出来ないのでしょうか?
_topに戻りたいのですが、戻れません。

# 戻り先URL
$home = 'http://xxxxx.com/index.html';

誰か教えて下さいませ。大変困ってます。<(_ _)>

**nobodyさん** · 04/10/09 20:29:04

>>37
スレ違いもしくは板違い。
http://pc5.2ch.net/hp/
http://pc5.2ch.net/test/read.cgi/php/1095633323/

**nobodyさん** · 04/10/09 21:00:25

IISでActive Perl入れてやってますが
SMTPを使ってのメール送信で送れてはいますが
OEでの受信で宛先の部分が
undisclosed-recipients　になってしまいます。
送信元は正常に表示されているのですが。
どこを修正すればよいでしょうか？
お願いします。

use Net::SMTP;
$smtp = Net::SMTP->new('***.***.ne.jp'); #SMTPサーバ
$smtp->mail(from@test.ne.jp); #送信元
$smtp->to(to@test@ne.jp); #宛先
$smtp->data();
$smtp->datasend("Subject:メール\n"); #件名
$smtp->datasend("メール本文");
$smtp->dataend();
$smtp->quit;

39 · 04/10/09 21:03:05

間違いました
×　$smtp->to(to@test@ne.jp); #宛先

○　$smtp->to(to@test.ne.jp); #宛先

39 · 04/10/09 21:04:23

ご存知の方、お願いします。

**nobodyさん** · 04/10/09 21:13:32

>>39
$smtp->datasend("To: ・・・\n); はどうした？
宛先がないだろうが

**nobodyさん** · 04/10/09 21:21:16

>>39
> $smtp->mail(from@test.ne.jp); #送信元
$smtp->mail('from@example.jp'); # MAIL FROM

> $smtp->to(to@test@ne.jp); #宛先
$smtp->to('to@example.jp'); # RCPT TO

> $smtp->datasend("Subject:メール\n"); #件名
> $smtp->datasend("メール本文");
$smtp->datasend("To: 39 <to\@example.jp>\n"); # To: ヘッダ
$smtp->datasend("Subject: メール\n");
$smtp->datasend("\n");
$smtp->datasend("メール本文");

**nobodyさん** · 04/10/09 21:24:19

>>39
君はRFC2822を勉強したまえ。このままでは腐ったメッセージ垂れ流しそうな悪寒。