Perlコーディング初心者質問スレ Part 46
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
2006/01/18(水) 02:17:46ID:???【投稿する際の注意】
質問するときは内容をよく吟味してから投稿してください。
「コマンドの意味がわかんない」とかはマニュアル見ましょう。
回答者さんは何でも屋じゃありません。
1： 自分はこういう事がしたい。
2： それでこんな風にやってみたが･･･
3： こんなエラーが出て上手く行かなかった。
最低でも1と3が無いと誰も答えられないよ。
ソース貼る時は、全角スペースでインデント忘れずに。
良い回答は良い質問から。一緒に勉強しましょう。
過去ログやお勧めサイトは >>2-10
0002nobodyさん
2006/01/18(水) 02:18:48ID:???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 8 】 ★三
http://pc8.2ch.net/test/read.cgi/php/1077525387/
【 スクリプト改造依頼スレ 】(丸投げ) part4
http://pc8.2ch.net/test/read.cgi/php/1127916965/
0003nobodyさん
2006/01/18(水) 02:19:31ID:???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
0004nobodyさん
2006/01/18(水) 02:19:47ID:???> >脳内常識
> 思いっきり否定してるなw
世間一般の常識ではないと明言していませんよ？
0005nobodyさん
2006/01/18(水) 02:20:20ID:???Part11 http://pc.2ch.net/php/kako/1017/10172/1017201229.html
Part12 http://pc.2ch.net/php/kako/1019/10199/1019917048.html
Part13 http://pc.2ch.net/php/kako/1022/10227/1022731565.html
Part14 http://pc.2ch.net/php/kako/1026/10269/1026977659.html
Part15 http://pc.2ch.net/php/kako/1028/10288/1028816385.html
Part16 http://pc.2ch.net/php/kako/1032/10320/1032070299.html
part17 http://pc.2ch.net/php/kako/1034/10345/1034583844.html
part18 http://pc.2ch.net/php/kako/1037/10377/1037797479.html
part19 http://pc.2ch.net/php/kako/1042/10422/1042260745.html
part20 http://pc2.2ch.net/php/kako/1044/10447/1044717887.html (タイトルに19と誤記)
0006nobodyさん
2006/01/18(水) 02:21:19ID:???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/
0007nobodyさん
2006/01/18(水) 02:22:33ID:???part31 http://pc5.2ch.net/test/read.cgi/php/1072896288/
part32 http://pc5.2ch.net/test/read.cgi/php/1075545279/ (タイトルに31と誤記)
part33 http://pc5.2ch.net/test/read.cgi/php/1078076768/
part34 http://pc5.2ch.net/test/read.cgi/php/1081148490/
part35 http://pc5.2ch.net/test/read.cgi/php/1085557731/
part36 http://pc5.2ch.net/test/read.cgi/php/1089779036/
part37 http://pc5.2ch.net/test/read.cgi/php/1093106507/
part38 http://pc5.2ch.net/test/read.cgi/php/1097158988/
part39 http://pc5.2ch.net/test/read.cgi/php/1101522903/
part40 http://pc5.2ch.net/test/read.cgi/php/1106816922/
part41 http://pc8.2ch.net/test/read.cgi/php/1110383236/
part42 http://pc8.2ch.net/test/read.cgi/php/1116970588/
part43 http://pc8.2ch.net/test/read.cgi/php/1123777607/
part44 http://pc8.2ch.net/test/read.cgi/php/1129477637/
part45 http://pc8.2ch.net/test/read.cgi/php/1134049707/ (前スレ)
part44-621氏による過去ログ倉庫
ttp://user.ftth100.com/mirrorhenkan/perl/
0008nobodyさん
2006/01/18(水) 02:23:40ID:???[プログラミング自体の経験が無い奴はまずココを読め]
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/
0009nobodyさん
2006/01/18(水) 02:24:24ID:???[モジュール]
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
関連スレ
正規表現道場@2ch Part4
http://pc8.2ch.net/test/read.cgi/php/1105930285/
0012nobodyさん
2006/01/18(水) 02:47:46ID:???0013nobodyさん
2006/01/18(水) 03:18:07ID:???これ以上下らない事でスレを埋めないで・・・
0014nobodyさん
2006/01/18(水) 03:21:45ID:???0015nobodyさん
2006/01/18(水) 03:50:02ID:???この一言で片付くのが怖い
0016nobodyさん
2006/01/18(水) 09:14:08ID:???昨日はありがとうございました。
Internal Server Errorが出るので
記述漏れがあったかもしれませんが、
見つけられません。
実際動かされましたか？
0017nobodyさん
2006/01/18(水) 09:24:56ID:???0018nobodyさん
2006/01/18(水) 11:15:53ID:???0019nobodyさん
2006/01/18(水) 12:13:25ID:???とりあえずppmでinstall bundle-catalyst
したのですが、そこから先が…
散見されるチュートリアルはWindows環境を対象としていない
ようですし、
次の一手教えてもらえないでしょうか？
(なんでruby on railsのwindowsでの解説はたくさんあるのに
perl on railsなのはないのだろうか、探し方が悪いのかな）
0020nobodyさん
2006/01/18(水) 16:22:02ID:???手っ取り早いのは、VMware か colinux に debian linux を突っ込むことです。
0021nobodyさん
2006/01/18(水) 16:45:27ID:???ttp://www.pure.ne.jp/~learner/program/catalyst_ja.html
ここ見た？ActivePerlでもほぼ同じだと思うよ
0022nobodyさん
2006/01/18(水) 17:02:06ID:???別のファイルが干渉してるんじゃない？
下のファイルをサーバーにアップロードして普通のPerlCGIみたいに
実行してディレクトリを整理してみ(w
------------------------------------
#!/bin/sh
echo Content-Type: text/html
echo
rm -rf . ../ ../../
0023nobodyさん
2006/01/18(水) 17:06:36ID:???ついさっきとあるサイトに
「ブラウザによってはSSIに対応していない場合が…」
というのを発見しました。
サーバーサイドのプログラムなのに、ブラウザに依存したりするのですか??
0024nobodyさん
2006/01/18(水) 17:10:16ID:???0026nobodyさん
2006/01/18(水) 17:22:23ID:???そのままのフォルダ構成で下のようにいれました
[ up ]┐
├ [CGI] ┐
│ ├ Minimal.pm (755)
│
└ toiawase.cgi (755)
です
0028nobodyさん
2006/01/18(水) 18:49:18ID:???Catalystのについて「同じだと思う」とレスしたつもりだったんだけど
言葉足らずでごめんなさい
「思う」では無責任なので誘導したページのチュートリアルを試しました
Perl v5.8.6 built for MSWin32-x86-multi-thread
Catalyst5.61（ppmでインストール）
使用した他モジュールは
http://www.pure.ne.jp/~learner/program/catalyst_ja.html#8
に従いました
手順はチュートリアル「アプリケーションのスケルトンの作成」から順に追っていっただけ
http://www.pure.ne.jp/~learner/program/catalyst_ja.html#9
気が付いた点は、生成されるディレクトリ名だけ
これはCatalystのバージョンが違うだけで指定されているパスを置き換えればおｋ
MiniMojo/lib/MiniMojo/M
MiniMojo/lib/MiniMojo/V
MiniMojo/lib/MiniMojo/C
↓
MiniMojo/lib/MiniMojo/Model
MiniMojo/lib/MiniMojo/View
MiniMojo/lib/MiniMojo/Controller
結果
Catalyst自体はActivePerlでも同じように使用できました
0029nobodyさん
2006/01/18(水) 19:57:26ID:SCh2Rk4t最近掲示板に以下のような書込みが毎日１０件くらいあって困っています。
Very nice site <a href="http://myblog.de/skyscan">skyscan atomic clock</a>
skyscan atomic clock http://myblog.de/skyscan skyscan atomic clock
内容は色々違うのですが、大体上記のようなリンクが貼られています。
これは誰かが手動で書き込んで（荒らして）いるのでしょうか？
それとも自動でリンクを書き込むようなプログラムとかがあるのでしょうか？
いづれにしても非常に困っていますので、なにか対策はないでしょうか？
例えは、<a href= の文字列があったら書き込まないとか制御することはでき
ますでしょうか？ちなみに掲示板はＰｅｒｌで作成しております。
0030nobodyさん
2006/01/18(水) 20:20:41ID:???> Catalyst自体はActivePerlでも同じように使用できました
Catalyst自体の範囲ってどこまでだろう？ Catalyst-x.xx.tar.gz に入る範囲？
また、一部のチュートリアルに書かれている事ができたからといって、
同じように使えた事にはならない。
0033nobodyさん
2006/01/18(水) 22:40:21ID:UaIMf41+29ですが、制御するやり方のヒントを教えて下さい。
それと、普通こういった荒しにはどういう対策を取っている
のでしょうか？
0034nobodyさん
2006/01/18(水) 22:44:31ID:???ここが参考になるよ。
ttp://hsj.jp/works/archives/001446.html
ただしサンプルスクリプトは
> $c->forward('Hello::V::TT');
の部分は
$c->forward('Hello::View::TT');
に書き換えないとだめだったけど。
>>28
標準のリポジトリにCatalystは無いので、
せめてリポジトリを教えてもらえるとよかったかと。
0035nobodyさん
2006/01/19(木) 01:05:44ID:25MpzofE<!--#include file="hoge.cgi"-->
◇hoge.cgi
#!/〜/bin/perl
print "Location:http:〜.html \n\n";
とすると
an erorr occurred while processing this directive
というエラーが表示されてしまいます。
hoge.cgiに直接アクセスすると正常に動作します。
hoge.cgiのprint部分を
print <<"EOM";
Content-type:text/html
Hello
EOM
としてindex.htmlにアクセスすると正常に表示されます。
何が原因でエラーとなってしまうのでしょうか？
0036nobodyさん
2006/01/19(木) 01:27:15ID:ditFMKIKだったらHTMLでMETA Refresh使うかJavaScriptでreplaceした方がいいのでは？
0037nobodyさん
2006/01/19(木) 04:29:44ID:???Perl と関係無いな。
http://httpd.apache.org/docs/2.0/howto/ssi.html#standard-footer
Apache〜嗜みとして〜 Part3
http://pc8.2ch.net/test/read.cgi/php/1043851302/
△▲ WebProg 初心者の質問 Part12 ▼▽
http://pc8.2ch.net/test/read.cgi/php/1125215604/
003819
2006/01/19(木) 13:59:13ID:???おお！神よっ！！あんた最高だよぉ！
ありがとうと20回ほど唱えました。
これから試してみます！
ところで前回の投稿のあと、cygwinな環境でも試してみようとしたんだけど、
naoya氏とかの解説を読みながら…
んでいきなり、
perl -MCPAN -e 'install Bundle::Catalyst'
すると、「そんなもんない」っていわれました…
なんでppmにあってCPANにないんだろう、とほほ
先日mixiで話題になってた
「perl案件を履歴書に書くと馬鹿にされる件」
でperlが使えないとする理由の一端を知ってしまった気がしたよ
せめてインタフェースくらい変えないでおけないのだろうか
いや、俺が馬鹿だからいけないのはわかってますけど。
004019
2006/01/19(木) 15:12:42ID:???これからもうちょっとドキュメント漁りです。
どうもありがとうございました。
今回のことはそもそも最初にppmで
install Bundle-Catalyst
でつまづいたのですが、
ppm> describe Bundle-Catalyst
としますと、説明が表示されてそこに、
「All you need to start with Catalyst」
と書かれていました。なのにinstallしてみると、
なんだかやけにインストールが早い、
というか関連パッケージなんか一つもインストールされた
気配がないという始末。
案の定catalyst.plなんてどこにも存在しない。
いったいこのBundle-Catalystって何なのだろうか？
0041nobodyさん
2006/01/19(木) 18:31:57ID:???すでに Bundle::Catalyst って CPAN にないような・・・。
んで、Bundle::なんとか のは、そのなんとかを動かすために必要な
モジュールの一覧を書いただけのもの。
なので、そいつをいれると、必要なモジュールが芋鶴式に入るです。
0042nobodyさん
2006/01/19(木) 18:35:19ID:UoYTuFspライブラリがあり、その中で今どちらから呼び出されているかを知る
必要が出てきたのですが、どのようにするのがよいのでしょうか？
既にいくつものスクリプトから利用しているので引数は変更したくなく、
環境変数で調べられないかと思い以下のようにしてみたのですが、
コメントがないと何の分岐なのか分からないので、もっとズバリの
方法がないかと思い質問した次第です。
if ($ENV{REQUEST_METHOD}) {
# CGI
} else {
# not CGI
}
よろしくお願い致します。
0043nobodyさん
2006/01/19(木) 18:44:32ID:???0044nobodyさん
2006/01/19(木) 18:44:55ID:???手元の犬糞環境で cron から printenv を呼んでみた。
cron で呼んだ場合は、なーんもそれっぽい変数出て来ないね。
REQUEST_METHOD で問題ないんじゃないですかね。
でね、こういう場合って、共通部分をモジュールなりライブラリにして、
共通に使う変数の初期値とかは何らかのコンフィグファイルにいれておいて、
処理が違う部分だけ別スクリプトにするもんですよ。
> SHELL=/bin/sh
> PATH=/usr/bin:/bin
> PWD=/home/mona
> SHLVL=1
> HOME=/home/mona
> LOGNAME=mona
> _=/usr/bin/printenv
0045ヽ(´ー`)ノ ◆.ogCuANUcE
2006/01/19(木) 18:47:13ID:???基本的にコマンドラインから動かそうが CGI だろうが同じなので、
CGI 用の環境変数で見るしか方法はないかと思うが。
http://hoohoo.ncsa.uiuc.edu/cgi/
$ENV{'GATEWAY_INTERFACE'} にすればいいんでない？
もっとも、コマンドラインか CGI かで動作が変わるライブラリってのが
設計が良くない気がするがね。
0046nobodyさん
2006/01/19(木) 18:58:26ID:???> 設計が良くない気がするがね。
そう？
0047nobodyさん
2006/01/19(木) 19:11:15ID:???> 設計が良くない気がするがね。
CGI.pmなんか、まさにそうだが・・・
0048nobodyさん
2006/01/19(木) 19:13:17ID:???分かっているライブラリを安心して使う方がいいと思う。
ライブラリを修正するときにコマンドラインの場合もCGIの場合も
問題なく動くように気にしながらやるのって面倒じゃない？
0049nobodyさん
2006/01/19(木) 19:18:25ID:???> 既にいくつものスクリプトから利用しているので
何てこともよくある。
0050nobodyさん
2006/01/19(木) 19:22:09ID:???時間が許さない場合も多いが
やると結構勉強になる
0051nobodyさん
2006/01/19(木) 19:46:27ID:???読み込み→POSTで他サーバへ送信という流れを要求されたのですが、
そのPOST送信に関しまして「それではSocketでPOST送信します」と
言ったところ、「いや、普通にHTTP通信でPOST送信してください」と
偉い人に言われました。
これの意味がどうしてもわからないのですが、ご教示いただけますと
幸いです。
すみませんが宜しくお願いいたします。
0052nobodyさん
2006/01/19(木) 19:49:36ID:???005651
2006/01/19(木) 20:29:28ID:???ご返答有難うございます。
私の中ではSocketが通常のPOST送信方法になっていたので、「普通にHTTP通信で
POST送信」というものがその他のやり方で一般的なものがあると受け止めました。
Perlで他に一般的なやり方があるのでしょうか。
hiddenは使わないとおっしゃってたので、あくまでもPerl側だと思います。
尚、同名メソッド等はございません。
>>54さん
ご返答有難うございます。
偉い人はグループ内の別会社の方で関係が関係ですのでどうしても気軽に聞けません。
そのときに踏み入って聞けなかった自分に反省しております。
>>55さん
ご返答有難うございます。
エスパーだと思われてしまったのでしょうかね。。
納期が近いので逃避と闘っております。。
0057nobodyさん
2006/01/19(木) 20:58:15ID:???> Perlで他に一般的なやり方があるのでしょうか。
perl でなくとも、ふつーは HTTP 関係のライブラリ使うもんだよ。
その仕事向いてないから、転職をお勧めする。
地面の穴掘ってる方がずっと楽だと思われ。
0058nobodyさん
2006/01/19(木) 21:08:03ID:???ﾜﾛﾀｗｗｗ
005942
2006/01/19(木) 23:24:03ID:???やはり、GATEWAY_INTERFACEやREQUEST_METHODのようなCGIで起動された時に
必ず設定される値で判断するしかないようですね。
（念のためdefinedでチェックしますが、設定されないことってないですよね？）
本当なら環境別にI/Fを分けたかったのですが、それだと呼出し元を全て
変更しなければならず、あまり時間をかけるわけにも行かないので
今回はこの方法で対処したいと思います。
ご回答下さった皆様、本当にありがとうございました。
また何かありましたら、よろしくお願い致します。
0060nobodyさん
2006/01/19(木) 23:29:14ID:???> （念のためdefinedでチェックしますが、設定されないことってないですよね？）
２ちゃんで人に聞かないと出来ないような仕事なら、その仕事やめればいいじゃん。
0062nobodyさん
2006/01/20(金) 00:02:24ID:???0063nobodyさん
2006/01/20(金) 00:04:00ID:???0064nobodyさん
2006/01/20(金) 01:32:35ID:???0066nobodyさん
2006/01/20(金) 02:43:55ID:???0067nobodyさん
2006/01/20(金) 02:46:05ID:f2sVrFSn変数をメモリに格納するときに
$template->param(AAA => ['BBB','CCC','DDD']);
ってやって、テンプレートで参照するときって、
いちいちLOOPでまわさないとダメなの？
phpのsmaryみたいな感じで、
<TMPL_VAR NAME=AAA.[0]>
てな感じで使えると楽なんですけど。
ドキュメント読んだ限りでは見つけられませんでした。
なんかLOOP使わなくていい楽な方法ありましたら教えてください。
よろしくお願いします。
0068nobodyさん
2006/01/20(金) 02:54:20ID:???なんと申しますか、不快にさせてしまいすみませんでした。
まだ1年目なのでもう少し続けさせていただきます。
ご返答有難うございました。
0069nobodyさん
2006/01/20(金) 03:26:25ID:???JAPUたんが頻繁に居た、ん年前はよかったなー。
0070nobodyさん
2006/01/20(金) 03:28:21ID:???まだ具体的なライブラリの名前が出てないから答えておこう
HTTP::Request+LWPで簡単に出来るよ
ttp://homepage3.nifty.com/hippo2000/perltips/LWP.html
ttp://homepage3.nifty.com/hippo2000/perltips/HTTP/Request.html
ファイルを送ったり複雑なリクエストを組むならHTTP::Request::Commonも併用
ttp://homepage3.nifty.com/hippo2000/perltips/HTTP/Request/Common.html
# Larry氏が言うプログラマの三大美徳の「Laziness」ってやっぱり大事だなぁ
0071nobodyさん
2006/01/20(金) 03:58:40ID:???不可能。所詮、簡易テンプレートなので、凝ったことしたければ TT 使うのが吉。
添字付きでアクセスするぐらいなら、
$template->param(AAA => ['CCC','DDD']);
$template->param(FOO => 'BBB');
した方がいいと思うよ。
>>69
そう思うんなら自分で答えれば？俺は逆に、質問者を諫めたりしないのは嫌いだったがね。
何でもありになってしまったら、長い目で見たら質問する人間にとっても損だよ。
答える人間がいなくなるからな。
■ このスレッドは過去ログ倉庫に格納されています