03/06/21 03:06
>>230
そんな事は思ってないよ。何か反論あるなら具体的な解決策を挙げてみてよ。
私は言語を変えるという解決策を取った
232:nobodyさん
03/06/21 05:46
>>231
227でヒントをくれてるようだけど、再度。シグナルについてはスルーですか？
233:nobodyさん
03/06/21 07:12
またこんなところで繁殖か。たいがいにせぇよ。
> そんな事は思ってないよ。何か反論あるなら具体的な解決策を挙げてみてよ。
相変わらず無限ループ。結局漏れの忠告は放置かよ。
世間一般的にこんな物腰の香具師に対して、まともな意見なんて述べようという気持ちは失せるけどな。
根本的に単純if構文のみの思考回路。ネスティングされたswitch case default構文なんて微塵も考えてもいないんだろうな。
ここしばらくは心穏やかに眺めていたけれど、そろそろ我慢できなくなってきたらしい（w＞漏れ
234:本７ ◆uPD9aFm9hI
03/06/21 08:04
>>232
あまり使った事ないですけどそれも結局例外処理ですよね。時間を切り詰め
たいんで中断処理自体をしたくなかったんです。もしやるならスクリプトの冒頭
で -eとループ回数で確認する程度です。
235:本７ ◆uPD9aFm9hI
03/06/21 08:07
でもシグナルで始末する方がいいかもしれないですね。
236:nobodyさん
03/06/21 09:14
>>226
ネタか？ バカか？
PerlはPerlって書けばいいだろ？
それをわざわざ「パール」とかカタカナ表記すんのがウルトラ初心者だって言われてる原因だろうに。
あと、ＰＥＲＬとか全角で書くやつとかな。
237:本７ ◆uPD9aFm9hI
03/06/21 10:21
その前に口から文字だす方法を教えてください
238:nobodyさん
03/06/21 10:22
ｸﾞｼﾞｯﾌﾟ
239:nobodyさん
03/06/21 10:35
なんでWeb関係の板のコテハンは揃いも揃ってヴァカばっかりなんだ？
240:nobodyさん
03/06/21 10:37
逃げ口上だけは得意だな
241:215
03/06/21 13:11 j72t4+1Y
こんにちわ。また来ました。
寂れてると思ったんですが、結構書き込みがあるんですね。
それはそうと、どうですか？分かりませんか？
今は、IISでASP（ブイビースクリプト）にこの中間作業をさせてるんですが、
こんな感じ↓
Set WshShell = CreateObject("WScript.Shell")
Set oExec = WshShell.Exec("a.exe -option ***.file")
このあと、oExecの標準出力プロパティをいじるんだけど。
パールならこの「exec」に相当するのは何かな～？って思ったわけ。
この中間プログラムは、「a.exe」とユーザーのリクエストの中間で橋渡し役をするものなので、
リクエスト処理が必要になるため、パールの方が簡単です。
この「Exec」の部分が分かればね。
ヒントだけでも教えてください。後は調べるから。
あ、でも、最初から調べろ！って意見はパスね。
それなら、はじめから聞かないからね。親切に教えてほしいな。
そんじゃ、また来るから。よろしこ
242:nobodyさん
03/06/21 19:01
>>241
二度と来るな。死ね。
243:nobodyさん
03/06/21 20:50
>>225
読んだ感じ、お前のプログラムが糞である可能性が一番高いとしか言いようがない。
Perlほど実績がある言語にバグがあると主張するなら、
普通トレースなりして客観的な証拠出さないと相手にされないよ。
まあ、君みたいに、自分の思い通り行かないと、他に責任転嫁する人たくさん居るから慣れっこだけど。
244:本７ ◆uPD9aFm9hI
03/06/21 21:30
>>243
その根拠は？
245:nobodyさん
03/06/21 22:08
>>244
”その”は何を指してるのか不明。
マジ先に日本語勉強したほうがいいよ。
246:本７ ◆uPD9aFm9hI
03/06/21 22:23
骨のないヤツだ
247:nobodyさん
03/06/21 23:21
自分の思うように動かないからPerlは糞なのかぁ・・・
普通は逆だと思うけれども。
248:本７ ◆uPD9aFm9hI
03/06/21 23:40
どんなものにも限界はある。これれからの可能性考えればPHPに移るの
も自明の理だよ。Perlに固執する理由がないと思う。
249:nobodyさん
03/06/21 23:47
老人には厳しい様です。
250:nobodyさん
03/06/21 23:52
まるでperlの限界を知っているような口調に笑った。
1を知って100を知った気になるあたり厨そのものだな。
251:本７ ◆uPD9aFm9hI
03/06/22 00:04
Perlで100を知る必要があるんだろうか
252:本７ ◆uPD9aFm9hI
03/06/22 00:08
Perlがコンパイラになって飛躍的な高速化が図れるなら生き残る道はあると
思うが。CやDelphiに取って代わるバイナリCGIとして大手を振る事は出来る
んじゃないだろうか
253:本７ ◆uPD9aFm9hI
03/06/22 00:10
コンパイラありますね
254:nobodyさん
03/06/22 01:17
>>253
まあ、もう一つ忠告をするなら、生半可な知識で物を語ると
笑われたりバカにされたり憐れみの目で見られたりすると言うことだな。
それを望んでいるのなら止めないが、
自分を他者に認めてもらいたくてそんなことをしているのだとしたら、やめた方がいい。いやマジで。
255:本７ ◆uPD9aFm9hI
03/06/22 01:19
笑ってください。
perl2exe落としてみた
256:nobodyさん
03/06/22 01:21
おそらくPerlを1しか知らないからいろいろと口走るんだろうな。
そんな香具師がこのスレッドに光臨だとは。とほほ。。。
↓
じゃPerlの100を教えてくれませんか？
といってもPHPの100の方がありがたいけど。
↓
おめえなんかに教える気はない。さっさと消えうせろ。
↓
どいつもこいつも必死だな。一生Perl厨でいてろ。
↓
（放置）
↓
次はぃぬ板あたりに現れる。（w
と予言してみるテスト。
257:nobodyさん
03/06/22 01:23
おそらく説明書きも読まずにperl2exeを落としてきたんだろうな（w
258:nobodyさん
03/06/22 01:27
>>254
これまでの登場したスレッドの軌跡を見ればそれこそ「自明の理」だよね（w
それにまだ気が付かないでいるのか、薄々感じているのか、はたまた、それに快感を得ているのかは分からないけれども。
259:本７ ◆uPD9aFm9hI
03/06/22 01:35
BBSのCGIでテストしたけど普通にPerl起動した方が早い気がした。
中に実行コンポ入れてるだけだからあまり変わりないのか。
ネイティブコ－ドが吐けなきゃ意味ないって事か。
260:nobodyさん
03/06/22 01:37
>>256
> 次はぃぬ板あたりに現れる。（w
鯖管理初心者質問スレッド Part1
ｽﾚﾘﾝｸ(linux板:571番)
これか？
261:nobodyさん
03/06/22 05:24
本７は根本的に頭が悪いからな。
物事を評価するときの器が狭い。
262:nobodyさん
03/06/22 09:13
Perl ＝ CGIだけの言語と思ってる、
変なヤツがいてるスレはここですか？
263:nobodyさん
03/06/22 11:12
このスレ進まないから「上級者本７を語るスレ」でもいいかもな
264:215
03/06/22 11:47 5xGLq+eP
えー、期待はしていなかったのですが、やっぱり質問に答えられる人はいないようですね。
とりあえず自分でも探してみますので、君たちの中に分かる人がいれば書き込んでみてください。
いまのところパールでなくても良いので、ぼちぼち探しながら、ときどきこのスレを覗きにきます。
ところで、パールの上級者とはどのような基準ですか？
パールのユーザーとして使用方法に精通しているということにおいて上級なのか
言語開発者の端くれとしてパールの設計に関して知識があることにおいて上級ですか？
このスレは、当然ユーザーとして使用方法に詳しい人たちが集まるスレだと思い、
質問してみましたが、皆さんも、やっぱり誰かに教えてもらったりして身に付けたんでしょ？
意地悪しないで、書き込んでみなさい。
たった、数行でしょ？
265:nobodyさん
03/06/22 11:51
>>264
スレタイは、ネタだろ。
もし、スレタイを信じて、本当にここが上級者コーナーだと思ってたなら、
はっきりいって、迷惑なレベルの低い質問だな。
初心者スレへ行け。
266:nobodyさん
03/06/22 11:57
たばこみたいなやつ。
267:nobodyさん
03/06/22 12:01
つーか、煽れば聞き出せるだろうという頭の悪さが…
268:nobodyさん
03/06/22 12:24
ほんと、質問のたった数行のコードさえ書けないくせに
あんなに長々とカキコする頭の悪さ・・・
269:さかなさかなさかな
03/06/22 14:58
>>264
漏れは厨1からずっと独学ですが、この業界はそういう人が多いかと。
君の今後の人生のために調べ方を教えてあげよう。
URLﾘﾝｸ(www.google.co.jp) にいって、
「Perl 外部プログラム」 と入力し、[google検索] ボタンを押してみよう。
以上。
270:nobodyさん
03/06/22 15:30
なんだかどのスレッドにもアレの臭いが漂っているようだが。
真剣にアレの進入禁止方法を検討せねば。
271:nobodyさん
03/06/22 15:38
ぽんななは自己顕示欲のかたまりだから名無しでは書かないだろう。
272:nobodyさん
03/06/22 15:55 x5KXIh8E
215は釣りだろ。
273:nobodyさん
03/06/22 16:19
釣りか天然か知らんが馬鹿であることに間違いあるまい。
274:215
03/06/22 16:51
ﾊｧ?調子ノンな。お宅度もも。
275:nobodyさん
03/06/22 17:19
↑厨房指数120
276:nobodyさん
03/06/22 17:32
馬鹿は侮辱にとても敏感。だから馬鹿にされると黙ってられない。
だから「馬鹿にすれば答えを書くだろう」という厨房丸出しの思考をするのだろう。
残念ながら、君以外は答えを知ってることは明らかなので、知ってる事を証明するために書く必要はない。
おとなしく初心者スレで質問しときゃレス付いただろうに…
今からでも遅くないから初心者スレ逝きなさい。
と書くとこういう馬鹿は絶対に逝かない事もわかってて書いてみるテスト。
277:215
03/06/22 17:36
わからないんだったら、最初からレスするなよ！！！！！！！！！
お前らお行って腰！
278:nobodyさん
03/06/22 17:38
> 標準出力に吐き出します。
> に仕事をさせて、その結果を受け取る
ここまで分かっていてどうしてあれを思い出さないかなぁ。釣りか？
279:nobodyさん
03/06/22 17:56
馬鹿なんだよ。
280:nobodyさん
03/06/22 18:53
スレッドがゴミで埋まるってのももったいないなあ。
encodingのバグ報告にでも使う？
つーても、この板じゃ5.8使ってるやつ少なそうだし。
281:215
03/06/22 22:20
>>280
使ってます。
この板で、なんかｹﾞｰﾑでも作ってみたいなぁ。
282:nobodyさん
03/06/22 22:22
>>281
おっと間違えた。215じゃないよ。自演して遊ぼうとなんかしてないよ。
まちげぇた。
283:nobodyさん
03/06/22 22:57
ま、あれを知らなくてもインストールなら猿でも出来るからな。(w
284:215
03/06/22 23:50 5xGLq+eP
なんか、サゲて書いてる偽者の人がいるのですが、困りますね。
>>269
グーぐるで探したことはあります。結果、「$a=system('a.exe ***.file')」
というのが有力ではないかと思ってますが、これでいけるということですか？
これでいい場合、$aに受け取るサイズに限度は無いのでしょうか？
数kByteから数MByteまで受け取る可能性があるんですが・・・
あと、これはブロッキング処理になるんでしょうか？
a.exeはそれなりの計算をするプログラムなので、結果は小出しになります。
$aは標準出力を受け取るのでブロッキング処理でないとこういう記述はできないと思いますが・・・
このことから、単純に「$a=system('a.exe ***.file')」ではうまくいかないような気がします。
これはASPでいうとRUNに当たるんじゃないかな？
標準出力じゃなくてプロセス結果を返すんじゃないの？
いまんとこ、これしか見つからなかったんだけど、別のほうほうがあるんでしょ？
ねぇ、早く教えなよ。やったことあるんでしょ？
まさか、駄レス並べて1000までいく気じゃないよね？
285:nobodyさん
03/06/22 23:57
>>284
駄質問を堂々とこんなスレでする君がいる限り1000も夢ではないぞ
286:nobodyさん
03/06/23 00:46
馬鹿だからやっぱり出て行かないな。
287:nobodyさん
03/06/23 07:29
>>284
バカすげー。
試すと言う言葉の意味を知らん。
288:nobodyさん
03/06/23 07:54
パイプじゃだめなのか・・・？
289:nobodyさん
03/06/23 13:20
禁煙パイポのほうがいいだろ
290:nobodyさん
03/06/23 22:24
いっその事、こっちはこういう馬鹿や、シンタックスエラーもとれないウルトラ初心者の
隔離スレにしたらどうだ?
291:本７ ◆uPD9aFm9hI
03/06/24 02:43
PHPでいいよもう
292:nobodyさん
03/06/24 17:25
>>291
うわ…ここにもいるよ。キモッ
293:nobodyさん
03/06/24 22:41
(ﾟДﾟ;≡ﾟдﾟ;)な、何がいるの？
294:nobodyさん
03/06/25 08:36
>>293をさらしあげ
295:名無しさん＠Ｅｍａｃｓ
03/06/25 12:39
>>284
>これでいい場合、$aに受け取るサイズに限度は無いのでしょうか？
>数kByteから数MByteまで受け取る可能性があるんですが・・・
どういう経緯でこういう発想に至ったのかを教えてくれ……
296:nobodyさん
03/06/25 21:45
>>284
Perlの仕様を知っていればそもそもそんなアフォな質問は出ない。
これはつまり、貴様が初心者以下であることを物語っている。
よって、そんな貴様が上級者コーナーにいること自体が間違い。
297:nobodyさん
03/06/26 19:46
>>284
system使うのにlist形式ではなく一文で書いてshに渡してる時点でヘタレ。
``すら知らない時点で(ry
openの使い方(open(FH,"$prog|"))を知らな(ry
>>295
そもそも何でこいつはsystemで起動したプログラムの出力を
取れると思ったのか、俺も興味ある。
298:nobodyさん
03/06/26 22:45
馬鹿だから
299:nobodyさん
03/06/26 23:11
案外、本７だったりしてなｗ
300:nobodyさん
03/06/26 23:19
>>299
アリエール漂白剤プラス。
300下t
301:nobodyさん
03/06/29 14:18
このスレ、いらねんじゃねぇ。
302:山崎 渉
03/07/15 11:11
__∧＿∧_
|（ ＾＾ ）| ＜寝るぽ（＾＾）
|＼⌒⌒⌒＼
＼ |⌒⌒⌒~| 山崎渉
~￣￣￣￣
303:山崎 渉
03/08/02 02:40
∧＿∧
（ ＾＾ ）＜ ぬるぽ（＾＾）
304:ぼるじょあ ◆ySd1dMH5Gk
03/08/02 05:25
∧＿∧ ∧＿∧
ﾋﾟｭ.ｰ （ ・３・） ( ＾＾ ） ＜これからも僕たちを応援して下さいね（＾＾）。
＝〔~∪￣￣￣∪￣￣〕
＝ ◎―――◎ 山崎渉&ぼるじょあ
305:山崎 渉
03/08/15 22:52
(⌒V⌒)
│ ＾ ＾ │＜これからも僕を応援して下さいね（＾＾）。
⊂| |つ
（＿）（＿） 山崎パン
306:nobodyさん
03/08/19 00:03 9nwA90nB
で、>>101は解決したのかね？
もう随分前の話だが。
307:nobodyさん
03/08/19 12:40
>>306
ファイルアップロードが上級者向けの話題とは思えんなぁ。
308:nobodyさん
03/09/21 15:41 dsdmTr9D
ここに書き込む資格があるか疑問ですが……。
名前付きの引数でサブルーチンに配列を渡そうとしているのですがうまくいきません。
呼び出し側は
hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', \@ItemValue);
受取側は
sub subsub()
{
my %args = (
ItemName=>0,
ItemText=>'',
ItemValue=>undef,
@_, );
としています。これで@$ItemValueとか$ItemValue->[0]という形で配列を使いたいのですが、配列の内容が取り出せません。
呼び出し側のItemValueには配列が入っていること、subsub側の引数には（正しいかどうかはともかく）リファレンスは代入されていることは
確認しましたが、これ以降どうしたらいいかわかりません。
何かご存知の方がいらっしゃればアドバイスをお願いいたします
309:308
03/09/21 15:42 dsdmTr9D
……書き込んで解りました。
呼び出し側に引数名書いてない(T_T)
310:308
03/09/21 15:43 dsdmTr9D
……と思ったら、今書いてあるコードにはちゃんと書いてありました(^^;
呼び出し側を
hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', ItemValue=>\@ItemValue);
と訂正してください。
311:308
03/09/21 16:00 dsdmTr9D
>>310
後半も意味不明でしたね。受取側では
@$args{ItemValue}とか$args{ItemValue}->[0]という形で使えれば、に訂正してください。
ちなみにプロトタイプ宣言を試して見たのですが、やはりダメでした。
sub subsub($$\@)としても、$args{ItemValue}は空の配列のままです。
join(',',@_)ってして「ARRAY(0x833b5e4)」とか出てくるのは、一応リファレンスは入っているのですよね？
312:nobodyさん
03/09/21 16:15
>hoge = subsub(ItemCode=>1, ItemText=>'hogehoge', ItemValue=>\@ItemValue);
これなら
$args{'ItemValue'}->[0]
でできない？
313:nobodyさん
03/09/21 16:22
一度、@ItemValueの中身を確認した方がいいかも。
煮詰まったときはお茶かコーヒーで一服どーぞ。
314:308
03/09/21 16:38 dsdmTr9D
解りました。引数まわりはあれでOKでした。
受け取った後、foreachで内容をチェックしていたのですが、
foreach @$args{ItemValue}では（エラーにはならないけど）×だったのです。
こういう使い方をするには
foreach @{ $args{ItemValue} }と書かなければならないのですね。
>312
>313
アドバイス、ありがとうございました
315:nobodyさん
03/09/21 20:51 dsdmTr9D
何度も申し訳ありません(^^;
CGI::new()で得たCGIハンドルから、postで与えられたパラメータを全て、名前毎に値を取り出すことは出来るのでしょうか？
……要するに、postで来たデータをgetのクエリー文字列に直したいのです(^^;
ただ、数が多いのとcheckBoxがらみで同じ名前で複数の値があるものがあるので、どうしたものかと考えているところです。
もしご経験のある方がおられましたらアドバイスをお願いします。
316:nobodyさん
03/09/21 21:26 OKDMwSn3
URLﾘﾝｸ(jbbs.shitaraba.com)
史上最大よ！！！
100％来なさい！！！！
317:nobodyさん
03/09/21 22:19
>>315
既に存在するキーならば、\tを付け加えてその値を付加してみるとか。
if (!defined %hash{$key}) { %hash{$key} .= "\t$value" ; }
みたいな。
1 つ 1 つの値を取り出すときには、split(/\t/,%hash{$key});
みたいな。
みたいな。
みたいな。
318:nobodyさん
03/09/21 22:27
結局ここは初心者コーナーということ？
319:nobodyさん
03/09/21 22:29
>>315
my $query = new CGI;
...
foreach($query->param){
print $_, " = ", join(',', $query->param($_)), "<br />\n";
}
こういうこと？
POST->GETへ直したいの意味がよく分からないけど。。
それから、質問はなるべくこちらへ。
Perl コーディング初心者質問コーナー Part28
ｽﾚﾘﾝｸ(php板)
320:nobodyさん
03/09/21 23:19
sub function}
{
321:nobodyさん
03/09/22 00:03
なんとなくこれで良さそう。
$str = join('&', map { my $key = $_; map { join('=', $key, $_) } $query->param($_) } $query->param);
322:nobodyさん
03/09/22 00:04 iyIOOC/l
>>319
そのとおりです。どうもありがとうございました。
それでは後は初心者スレに行きます。ご迷惑をおかけしました。
323:nobodyさん
03/09/22 00:12
>>317はPerl6を先取りしているのですか？
324:nobodyさん
03/09/24 23:37 4Zy0i8Kg
すんまそん。
初心者スレで大分前に質問(詳しくは:ｽﾚﾘﾝｸ(php板:13番))したのだが、
Perlで組み込み関数のリファレンスを取得するには、
どうしたらいいのでしょうか？
325:nobodyさん
03/09/25 00:03
>>324
perldoc -f funcname
326:nobodyさん
03/09/25 01:54
そのリファレンスかよ！
327:nobodyさん
03/09/25 18:59
取れないくさいよ。。というわけで、
$symlink = sub { symlink(@_) };
328:324
03/09/26 01:14
>>327
組み込み関数は、演算子に近い扱いなんですかね。
リファレンスが取れると、似たような関数のスイッチに便利なんだけどなぁ。
ありがのん御座いました。
329:nobodyさん
03/09/26 01:49
オブジェクト指向ならadapterパターン使って解決(大嘘。
330:nobodyさん
03/09/26 08:06
times関数について聞きたいのだが、
・実行中のプロセスが消費したユーザCPU時間
・実行中のプロセスが消費したシステムCPU時間
この２つの戻り値の意味と違いを説明できる人いないかな？
331:nobodyさん
03/09/26 10:20
>>330
URLﾘﾝｸ(search.luky.org)
332:(*∠＿*) ダカラドーシタ
03/09/27 17:45
■日本人プログラマーよGoogleを攻略せよ 2003年09月24日 CNET Japan - 梅田望夫・英語で読むITトレンド： URLﾘﾝｸ(blog.cnetnetworks.jp)
Google Code Jamというプログラミングコンテスト(CNET Japan速報記事「米グーグル：「プログラミングコンテスト出場者を求む」」をご参照)が10月から11月にかけて開かれる。
参加資格は18歳以上(世界中の誰でも)。予選はオンラインで、決勝(トップ25人)はシリコンバレーのGoogle本社で行なわれる。
腕自慢の日本人プログラマーたちには、この機会にぜひその実力を発揮してほしい。
Google Code Jamのファイナリストといえば、これから腕一本でプロとして生きていきたい若い人にとっての大きな勲章になる(中途半端な学歴なんかよりうんと価値がある)。
ファイナリストに残る日本人がいれば、日本人プログラマーの実力が世界でもトップレベルにあるという事実を、広くアピールできるだろう。
さて、コンテストの仕組みとスケジュールであるが、
参加者全員から500人にふるい落とす「Qualification Rounds」、
500人を250人に絞る「Online Elimination Rounds 1」、
250人から25人に落とす「Online Elimination Rounds 2」。
ここまではすべてオンラインなので、自宅から参加できる。
そして、ファイナリスト25人はGoogle本社での「Onsite Championship Round」に進むことができる。
★google code jam 公式サイト(excite翻訳) URLﾘﾝｸ(www.excite.co.jp)
関連スレ
【IT】Google、人材採用兼ねたプログラミングコンテスト ｽﾚﾘﾝｸ(bizplus板)
Google、人材採用兼ねたプログラミングコンテスト ｽﾚﾘﾝｸ(prog板)
333:nobodyさん
03/09/27 21:02
スレ違いだったらすいません！
自作のHTTPクライアントを2chのdat落ちにも対応させたいんですが、
そのことについて解説されたページのアドレスを忘れてしまいました・・・
そのページをご存知の方（分かるかな・・・）、アドレス教えてもらえませんか？
ｸﾞｸﾞっても見つかりませんでした・・・
334:nobodyさん
03/09/27 21:28
>>333
URLﾘﾝｸ(www.monazilla.org)
335:nobodyさん
03/09/27 22:06
どこのどなたか存じませんが、ありがとうございます！
てか、こんな有名所だったのか・・・。
個人のサイトだったかと勘違いしてました。
336:nobodyさん
03/09/28 19:03
せめてお名前だけでも・・・
337:nobodyさん
03/09/28 19:15
徳岡伸○と申します。
338:nobodyさん
03/10/09 18:33
誰。
339:nobodyさん
03/10/10 10:46
↓
340:nobodyさん
03/10/10 15:20
お、俺かよ！
341:nobodyさん
03/10/17 18:22
↑
342:nobodyさん
03/10/17 19:34
誰。
343:nobodyさん
03/10/17 19:39
上級者って言うか低脳が集うスレだな
344:nobodyさん
03/10/17 19:40
勃っちゃた
345:nobodyさん
03/10/17 19:48
逝っちゃった
346:nobodyさん
03/10/17 20:16
しごいて・・・
347:nobodyさん
03/10/17 21:48
>>346
腕立て100回！腹筋100回！そこっ！休むなあーっ！！
348:nobodyさん
03/10/19 00:32
イク・・・
349:nobodyさん
03/10/26 13:08
リプス ってどうよ
350:nobodyさん
03/12/08 19:42
--
351:nobodyさん
03/12/08 19:53
CANONのプリンターのページ記述言語？
352:nobodyさん
03/12/08 20:14 vvyCyc4J
URLﾘﾝｸ(japan.pinkserver.com)
353:nobodyさん
03/12/17 18:59
age
354:ActivePerl
03/12/18 16:35 pwpA9WDo
NTサーバ、IIS、ActivePerl5.6にて、メール送信するプログラムを作成しています。
(SMTP: Microsoft Exchange Internet Mail Service Version 5.5.2653.13)
モジュールNet::SMTPを使用して、CGIのメール送信フォームで入力されたものを送信
するようになっています。
そこで、問題なのですが、
メールのFrom:に、"氏名 <email@address.com>"というような形式を使用すると、
送信に失敗してしまいます。メールアドレスが裸の状態だと、正しく送信されます。
文字のエンコード方法がいけないのかと思い、"Name <email@address.com>"という
ように、ASCIIのみにしても送信に失敗してしまいます。
Fromに設定できる、メールアドレスのドメインが限定されているかもしれないので、
メールアドレスをサーバのドメインに合わせましたが、それでもだめでした。
また、To:に複数の送信者を設定(カンマ区切り)した場合も、同様な問題が発生しました。
どなたか、解決方法をご存知でしたら、ご教授ください。よろしくお願いします!!
355:nobodyさん
03/12/18 17:11
> 送信に失敗してしまいます。
失敗の仕方もロクに書かずに助言を求める馬鹿がいるスレはここですか？
356:nobodyさん
03/12/18 17:15
>>354
funny user@domain 間違い
"funny user"@domain 正しい, 推奨
<"funny user"@domain> OK
357:nobodyさん
03/12/21 14:48
というか，ダブルクォートしてて@hogeが展開されてるってｵﾁでないか？
358:nobodyさん
03/12/21 17:33
>>357
>メールアドレスが裸の状態だと、正しく送信されます。
359:nobodyさん
03/12/21 19:02
つーか、あれが上級者の質問なのか？
360:nobodyさん
03/12/21 19:20
URLﾘﾝｸ(res9.7777.net)
>>354は「ＣＧＩ習熟度：pro」だそうだｗ
361:nobodyさん
03/12/21 22:39 2JyNmFzn
proどこ行ったの～？ｗ
362:nobodyさん
03/12/23 00:07 yNpUOjfE
Telnetでサーバーに接続して
Perlプログラムを実行する際に
フォームデータを引数として与えて
実行する方法を誰か教えてもらえないでしょうか？
教えてもらったんですけど使い方
忘れちゃいました
363:nobodyさん
03/12/23 00:08
・・・。
364:nobodyさん
03/12/23 00:10
>>362
マルチすんなボケ！
365:nobodyさん
03/12/23 21:20 B/ouqWjS
>>362
２ちゃんねるにはつわものは
いないんですか？
いると思ったのにがっかりだ。
明日、教えてくれたシステム部長
にもう一度聞くから良いよ
366:nobodyさん
03/12/24 00:37
>>365
マルチすんなっつってんだろ。
ルールを守らない奴になんで親切にしなきゃならんのよ。
マジで自分のことしか考えてないDQNだな。
367:nobodyさん
03/12/24 14:06
>>365
お前本当にどうしようもないクズだな。
まず2ch（だけではないが）のルールを守れやｳﾞｫｹ。
368:nobodyさん
03/12/24 16:33
システム部長もこのスレ見てるyo
369:nobodyさん
03/12/24 20:16 sC5vpZJY
>>367
お前ぶっ飛ばすぞ！！！
顔が見えないからっていい気になりやがって。
370:nobodyさん
03/12/24 22:48
>>369
お前、上級者にむかってその態度はなんだ！！！
童貞のくせにいい気になりやがって。
371:nobodyさん
03/12/25 22:51 GW3KvJ+k
>>370
童貞ではありません。
372:nobodyさん
03/12/26 01:29
>>369
最初にいい気になってるのはどう見てもおまえなんだがな。
自分が質問者としてのルールを守っているかどうか、少しは考えたのか？
373:nobodyさん
04/01/13 19:31 hDqA/G+I
『Perl コーディング初心者質問コーナー Part31 』でも質問したのですが、
分かる方がいらっしゃらないようなので、ここでもお願いします。もう誰もいない？
ファイルハンドラを変数で持つことは可能でしょうか？
my $p;
open($p, "test");
こんな感じで。
-----------------------------------------------
my $p="a"; としてからopenすると何故か動くのですが、今度は、use strict
の場合に、
#!/usr/bin/perl -w
use strict;
my $p="a";
open($p, "test");
こうすると、以下のように怒られます(実行ファイルは./aです)。
Can't use string ("a") as a symbol ref while "strict refs" in use at ./a line 4.
何故なんでしょうか？
（そもそもファイルハンドラの定義がよく分からないのですが。ポインタ？）
374:hjg
04/01/13 20:01 DzsVlZbM
perldoc -q filehandle して
"How can I use a filehandle indirectly?"
375:hjg
04/01/13 20:03 DzsVlZbM
perldoc Symbol も良い
376:nobodyさん
04/01/13 20:22
>>373
わかる人がいないんじゃなく最近既出の質問
過去ログ嫁
377:nobodyさん
04/01/13 20:30 hDqA/G+I
>>376
失礼しました。探してみます。
378:hjg
04/01/13 21:55 BCJlfFc6
>>377
英語読めんか。
洲万買ったな。
379:nobodyさん
04/01/16 01:28
みんなのPerlソースのコメントアウトレイアウト見てみたいかも。
どんなコメントを書けば見やすいのか研究中。
とりあえず、
#==========#
# 処理名 #
#==========#
とか、
#>>>>> 処理名
とか書いてる。
一応それなりに目立つし、全部 # で書くとｳｻﾞｲから
###########
# 処理名 #
###########
こんなんとか。
見にくい。。。
みんなはどうだ？ﾁｪｷﾗ
380:nobodyさん
04/01/16 01:50
行コメント以外ならPODで書いてるよ。See perldoc perldoc, perldoc perlpod ...
381:nobodyさん
04/01/16 01:58
######################################################
## ■以下サブルーチン■
######################################################
382:nobodyさん
04/01/16 02:00
##====================================================##
## ■以下サブルーチン■
##====================================================##
383:ヽ(´ー`)ノ
04/01/16 11:53
>>379
POD 使えば？
コメント使った書き方って、見にくいし、他の人のコードと統一性が取れない。
整形するの面倒だし、マニュアルも別に書かないといかん。
じゃあメリットがあるかっていうと特別あるわけじゃない。デメリットだけ。
まともなエディタを使えば、POD のところだけ色も変わるから見栄えを気にする必要もない。
あと俺の主観だけども、出来の悪い CGI のコード見てるようで、醜い(シャレじゃなく)。
すでにあるモノを再発明することないよ。更に良いものが作れるのなら話は別だけど。
384:nobodyさん
04/01/16 17:05
大規模なコメント（ドキュメント）なんかは
そりゃPODにこしたことはない罠。
ちょっとしたコメントにセンスを光らせたい罠
別に誰が見るわけでもないんだけどさ。
385:nobodyさん
04/01/16 19:51
ちょっとしたコメントに大袈裟な装飾は不要。
罫線くらいにしておいた方がいいんじゃない？
386:nobodyさん
04/01/17 20:40
#::::::::::::::: さぶるーちん :::::::::::::::#
387:nobodyさん
04/01/17 22:55
#
# こめんと
#
シンプルな方がよし。かも？
388:nobodyさん
04/01/18 01:51
>>381,382
■を使うと見やすいな。
#■ コメント１
print ...
#■ コメント2
print ...
389:nobodyさん
04/01/18 15:50
統一的にどうするかというより、
#**************************#
#. 大見出 ****#
#**************************#
#--------------------------#
#..中見出 ----#
#--------------------------#
#--------------------------#
#... 小見出
# その他
のように、階層に応じて分けるのがいい。ちなみに、「#.」、
「#..」、「#...」の部分は、テキストエディタに「アウトライン」
機能があれば、その見出し行の識別文字列に設定するとよい。
390:nobodyさん
04/01/20 01:24
上級者のみなさん質問させてください！
ソフトバンクより発売のCGI/Perlハンドブックという本で
URLﾘﾝｸ(up.atnifty.com)
こういったアンケート収集スクリプトがあるのですが
これを実行してもアンケートが追加されません。
どこが間違ってるのでしょうか？
391:nobodyさん
04/01/20 01:29
>>390
ﾏﾙﾁﾎﾟｽﾄﾊｹｰﾝ
392:nobodyさん
04/01/20 07:53
>>386-389
そういう書き方するとＰＯＤに比べて何かメリットは？
>>387 は楽だって点でメリットがあるけど、他のは…。
393:nobodyさん
04/02/05 22:45
>>392
メリット：見やすくなる（色分けしてるエディタだと更に
デメリット：めんどい。
>>387は後でソース見て苦労するタイプだ
394:nobodyさん
04/02/05 23:08
>>393
POD も色分けされるじゃん。
395:nobodyさん
04/02/07 10:43
出力されたHTMLの一行目が改行になってしまう仕様はどうにかならないか。（英文FAQ翻訳風）
396:nobodyさん
04/03/13 22:04
POD色分けされるエディタって何がある?(WINで)
397:nobodyさん
04/04/03 08:00
gvim
398:nobodyさん
04/05/09 21:27
あげじゃあげじゃ
399:ぺー
04/05/11 08:07 wDvsqpzO
これと同じ改造するにはどしたらいいんですか神様。
URLﾘﾝｸ(ouroboros.game-host.org)
400:nobodyさん
04/05/12 16:29
同じ改造で満足するのかと小一時間(ry
小言で400get.
401:nobodyさん
04/06/08 12:32 svJNgPf4
PerlでPGP暗号化したメールを送ったことのある方おりますか？
gnupg等のコマンドを使って暗号化したものを、
sendmailで送るイメージでいるんですが、
この辺をやってくれるモジュールとかってあるんですかね？
402:nobodyさん
04/06/08 21:16
>>388
なるほど！
そういえば、携帯ﾍﾟｰｼﾞつくるときによくつかってたけど、ｺﾒﾝﾄで使うのは思いつかなんだ。
らりあとう！！
403:388
04/06/08 22:17
>>402
どういたまして。
ちなみに今は
タブと■を組み合わせて見やすくしてる。
>>401
メールを受け取る人が一定なら、
その人のマシンで公開鍵と秘密鍵を作って、
その公開鍵を使ってサーバで暗号化する必要がある？？
あんま詳しくないから興味あるかも。
404:nobodyさん
04/06/08 23:34
>401
URLﾘﾝｸ(search.cpan.org)
405:きのこる先生 ◆FmKame.i.E
04/06/10 07:13
_,,,......,,__
／_~ ,,...:::＿::;; ~"'ヽ
(,, '"ヾヽ i|i //^''ヽ,,)
^ :'⌒i i⌒"
| (；ﾟДﾟ) ＜ 今まで様々な404を見てきたが
|（ﾉ |） お前が一番coolですね
| |
ヽ ＿ノ
U"U
406:nobodyさん
05/11/13 21:07:49
えらく長寿だなぁ、このスレ・・・勃って（ｗ から三年半、前レス>>405からも一年半経ってる。
407:nobodyさん
05/11/14 23:07:11
pod使ってサブルーチンごとにコメントを挟むと間延びした感じになってなんか嫌だったんだけど･･･
=の前後に空白行がないとpodparserでXHTML化したときにうまく読んでくれないし。
どうよ？
408:nobodyさん
05/12/06 03:38:10 rOcNbm6R
0１と最初からスレタイしたら伸びないというのを実践してるな
409:nobodyさん
05/12/28 12:54:03 RY3kh/X5
URLﾘﾝｸ(www002.upp.so-net.ne.jp)
ここのMulti Wing BBSをDLして設定してうｐまで
終わったんですが、メインのwingmulti.cgiにアクセスして
設定したパスワードを入力しても、パスワードエラーと出ます。
何度設定しなおしてもパスワードエラーに引っかかるんですが
これって単なるバグでしょうか？
分かる方いたら、試してもらえませんか？
410:nobodyさん
05/12/28 12:57:36
>>409
もちろんお前はPerl上級者なんだろうな
411:nobodyさん
05/12/28 13:02:41
>>410
初級レベルです＾＾；
上級者の方じゃないと分からないと思ったので、すいません。
412:nobodyさん
05/12/28 14:52:10
質問するスレじゃねぇ
413:nobodyさん
06/02/05 07:47:15 VJ915kfQ
DBICどうすか。
0.5から::Schemaに移行とかなんとか。
414:nobodyさん
06/10/08 01:37:17
wikipediaにはトリップ生成は
$tripkey = "#istrip";
$tripkey = substr($tripkey,1,);
$salt = substr($tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$trip = crypt($tripkey,$salt);
$trip = substr($trip,-10);
$trip = '◆'.$trip;
print "$trip";
って書かれてるが
マルチバイト文字をcryptに入れるとエラーになるんだが。
415:414
06/10/08 23:31:27 LWtT3Slw
どうすればいい？
Perl5.8.8だからなのか？
誰か教えてくれねーか？
416:nobodyさん
06/10/08 23:54:05
>>414-415
ここは上級者スレ。その程度を自分で解決出来ない奴は立ち入り禁止。
417:414
06/10/09 00:08:25 b33Q2pbi
工ｴｴｪｪ(´ﾟдﾟ｀)ｪｪｴｴ工ｗ
418:414
06/10/09 00:09:17 b33Q2pbi
UTF8で書いてる所為かも。
SJISに変換して入れてみるか。
419:414 ◆SQ2Wyjdi7M
06/10/09 00:13:33 b33Q2pbi
うまくいったっぽいｗ
420:414 ◆SQ2Wyjdi7M
06/10/09 00:26:29 b33Q2pbi
まぁ、ﾃｷﾄｳにまとめ。
しなくてもいいだろうが、スレつかっておいて自己解決して放置っつースタイルが嫌いなので。
俺の場合。
出力をXHTMLに準拠させたいが、ファイルの先頭でXML宣言をするとIEで厄介なので、それを避けるために出力をUTF8にしたかった。
そんなときにPerl5.8は内部処理とかUTF8にしたぞ的なことを知ったので、use utf8;とかしてコードを書いていたわけだが、
UTF8のマルチバイト文字列をcrypt関数の引数として与えるとエラーが出るという問題にあった。
まぁ、crypt使う理由が2ch互換のトリップを生成することだったわけで、そのときにUTF8でcrypt使用としてた辺りがあほなんだが、
1日考えるのやめてカラオケとか逝ってたら、脳みそすっきりしてこのことに気づいたので解決した。
そんでUTF8→SJIS変換したら、すんなり成功した。
参考までにソース載せると
package パッケージ名;
use utf8;
use Encode;
return 1;
sub makeTrip{ # 引数 = \$tripkey(utf8)
my $tripkey = $_[0];
my $salt;
$$tripkey = encode('shiftjis', $$tripkey);
$salt = substr($$tripkey.'H.',1,2);
$salt =~ s/[^\.-z]/\./go;
$salt =~ tr/:;<=>?@[\\]^_`/ABCDEFGabcdef/;
$$tripkey = crypt($$tripkey,$salt);
$$tripkey = substr($$tripkey,-10);
return;
}
421:nobodyさん
06/10/10 20:26:03
超絶的確な>>416のレスを読まない
>>414に萎え
てか、文字コードの違いもわからず上級者気取りか･･･
422:nobodyさん
06/10/10 22:14:51
もうおわったことにぐだぐだいってる >>421 のしつこきもちわるさにほげ
423:nobodyさん
06/10/12 14:25:18
一応天才って言われるけど…これ常套だべ？
BEGIN {
$vo = '栄昇';
$g = '優';
$pf = '等';
}
コードに入れてない奴は今すぐ入れたほうが良いよ、平和になるし
424:nobodyさん
06/10/12 16:16:15
日本語でok
425:nobodyさん
06/10/14 00:22:11
上級者専用スレなんて初めて開いた・・
Gimpって画像処理ソフト、CGIから操るのに成功した人っています？
ImageMagickを使ってみて、なかなか面白いんだけど、文字の加工は貧弱なので
Gimp試してみたものの、全然動かないのです。
426:nobodyさん
06/10/14 00:26:36
>>425
キサマには初心者スレすら生ぬるい。
427:nobodyさん
06/10/14 00:38:50
煽りに用はない！by ken
428:nobodyさん
06/11/14 14:47:50 M1pI9RkN
>>420
では上級者的指摘を
use utf8環境下でsubstrで2文字取り出すというのがどういう意味なのか
分からないのがお前の敗因。
我々上級者はuse utf8はuse byte;は併せて覚えている。
つ～かcryptの第2引数は初めの2バイト以外無視する仕様だから
わざわざsubstrしてる時点で中級者とも言えない。
って、全くテストもしないで亀レスだけしてみる。
429:nobodyさん
06/11/15 07:29:44
cryptはDESかMD5かで有効なsaltの文字数が違うよ
430:nobodyさん
07/01/24 20:02:36
簡単にお金稼ぎ！！！
以下の手順でやれば、無料でお金稼ぎができます。
企業も広告の宣伝になるから、お金をくれるわけです。
最初の１日目で 2000 円～3000 円 は確実に稼げます。
実際の作業は数十分程度、１時間はかかりません。
(1) URLﾘﾝｸ(pointdream.jp)
↑このアドレスからサイトに行く。
(2)無料会員登録をする。
※フリーメールアドレスでもＯＫ。
(3)ポイントを稼ぎます。
懸賞の応募や無料会員登録をすればするほど、
ポイントが貰えます。
(4) 友達を増やせば、後は何もしなくても
定期的に、友達還元ポイントがドッサリ入ってきます。
これで現金を稼ぐといいですよ！！！
登録（応募）はこちらから↓
URLﾘﾝｸ(pointdream.jp)
431:nobodyさん
07/02/10 20:43:16
簡単にお金稼ぎ！！！
以下の手順でやれば、無料でお金稼ぎができます。
企業も広告の宣伝になるから、お金をくれるわけです。
最初の１日目で 2000 円～3000 円 は確実に稼げます。
実際の作業は数十分程度、１時間はかかりません。
(1) URLﾘﾝｸ(blackjack.lxl.jp)
↑このアドレスからサイトに行く。
(2) ゲットマネー登録サイトに移動するので、
そこで無料会員登録をする。
※フリーメールアドレスでもＯＫ。
(3)ポイントを稼ぎます。
懸賞の応募や無料会員登録をすればするほど、
ポイントが貰えます。
他にも沢山種類があるので、１日目で
約 20000 ポイントは GET できます。
(4) 10000 ポイントから、現金に交換できます。
(5)キャッシュバックという所がありますので、
そこから交換をしましょう。
これで現金を稼ぐといいですよ！！！
無料会員登録はこちらから↓
URLﾘﾝｸ(blackjack.lxl.jp)
432:nobodyさん
07/03/26 17:41:13 3MEiX5hy
上級者向けの質問かどうか分からないけれど、他に該当スレが思いつかなかったのでここで質問させてください。
CPANで落とせるNet::SMTP_authってモジュールがあって、それはNet::SMTPのサブクラスになっていて
ソースの中ではauth()とauth_types()のオーバーライドしかしていない。
SMTP_authでメール送信するには587番ポート使う筈で、それはnew()したときの
最初のサーバへの通信で既に「587を使う」と指定しないといけないと思うのだけど
どこをどう探してもその記述が見つからない。
NET::Configの中かなぁと思ったのだけど、それも違うっぽい。
どうやって587ポートを指定させているか、誰かご存知の方いませんか？
SMTP_authモジュールを使いたくて色々調べていたらこの問題に行き着いて、どうにも納得できなくて気持ち悪いので
ヒントだけでも教えていただけると嬉しいです。
433:nobodyさん
07/03/26 22:13:50 sZyxWGW4
>>432
Authen::SASLで何やってるかわかんないけど、ポート指定してるっぽいのはここだね。
my $conn = $sasl->client_new("smtp", $host);#, "noplaintext noanonymous");
434:nobodyさん
07/03/26 23:55:40
>>432
> SMTP_authでメール送信するには587番ポート使う筈
これ間違い。
○ submission portを使用するときはSMTP AUTHが必要。
435:nobodyさん
07/03/27 20:09:45
Net::SMTP->new( Port=>587 );
Net::SMTPなら、こんなんじゃなかったっけ
436:432
07/03/30 15:34:09
>>433
ありがとうございます。
まだ色々分かって無いですが、また調べてみようと思います。
>>434
まだ理解が足りていなかったみたいです
ご指摘ありがとうございます。
>>435
そうですよね、やっぱし。
でも587というポート番号を指定してる場所がどこにもなくて「あれ？おかしくね？」
と感じて調べ始めたら泥沼に、、、orz
437:nobodyさん
07/04/02 21:36:14
OP25Bなら、サブミッションポートで接続してSMTP AUTHするわけだから
ポートは自分で設定する必要があるよ。
438:nobodyさん
07/06/19 22:29:14 Ye7oVo0e
Perlに触れて２ヶ月余りの者ですが皆様のお知恵を拝借したい事があります。
フォームを作成し、大量の文字を入力してメールを送信するようにすると、
500文字目辺りが文字化けしてしまいます。
その部分から一定の周期で文字化けが発生しています。
300文字程度までなら全然平気なのですが。。
あとそのメールのログをとっているんですけどログの方は大量に文字をうっても問題なく蓄積されていました。
この事からプログラム的な問題ではなく、
鯖にインストールされている sendmail が怪しいかと思うのですが、
バージョンが古いとこのような問題が起こる等、何らかの情報はご存知ないでしょうか？？
宜しくお願い致します。
439:nobodyさん
07/06/20 00:03:45
>>438
2ヶ月で上級者になるとは凄い才能だね。では頑張れ。
440:nobodyさん
07/06/20 00:59:21
>>439
低級者のレスはいりません
441:nobodyさん
07/06/20 01:26:40
>>438
一行に500文字が入っているの？
SMTPの仕様だか、実装だかに一行の最大文字数みたいな制限があったはず。
途中に改行入れていて500文字だったらスマン、わからん。
442:nobodyさん
07/06/20 06:41:47
>>441, >>443-
低級者のレスはいりません。
443:438
07/06/20 10:56:39
>>441
どうやらビンゴのようです。
改行入れると化けません。
SMTPの仕様でしたか。。。
この仕様について色々と調べてみたいと思います。
大変参考になりました、ありがとうございます！
444:438
07/06/20 13:04:00
完全に文字化けが直りました。
>>441さんに多謝！
445: ◆lVJAPUTeX.
07/07/24 21:05:58
>>441
RFC2822によれば、CRLFを入れて1000文字 (オクテット) ですね。
Sendmailでは長い行を自動的に分割します。
500文字というのはShift_JISで書かれた日本語での換算かな?
…とここまで書いて1ヶ月前の記事ってのに気づいた。まあいいや。
446:nobodyさん
07/08/19 05:01:02 LoxscrBM
Perlからメールアカウントの追加をしたいんですが、どうやったらええんでしょ？
MTAはqmailでvpopmailでバーチャルドメイン運用してます。
root権限もあります。
perlからの会員登録と同時にメールアカウント作成みたいなもんをしたいんですが。
447:446
07/08/21 17:15:45 HBIrwO1t
誰か～～
助けておくれ＞＜；
448:nobodyさん
07/08/21 19:24:10
UNIXユーザーか仮想ユーザーか、自力でシミュレートして登録するか
外部コマンドを利用するか等で実現方法が変わる。
外部コマンド使う場合
・パイプ、system関数 or バッククォートで外部コマンドを実行
・uidをrootにしsetuidする
・強制的にテイントモードになるのでサニタイズする
ここら辺注意すれば比較的簡単に出来ると思う。
449:446
07/08/23 03:02:56 i/ueFIKi
>>448
ありがとうございます。
おかげさまで解決しました。
Insecure $ENV{PATH} while running setuid at ./hoge.cgi line xx.
というエラーが出て少し悩みましたが。
450:446
07/08/23 22:35:13 i/ueFIKi
すいません。もう一つ質問です。
setuidでroot権限で実行する方法なんですが、mod-perlだとroot権限になりませんね。
できればmod-perlで動かしたいんですが、方法はあるんでしょうか？
451:nobodyさん
07/08/24 06:17:27 ZilCg/Oy
これはまたひどい後出し
452:nobodyさん
07/08/24 13:37:27
>>450
mod_perlの動作原理をちょっと考えればわかることだが、不可能
453:nobodyさん
07/08/24 17:19:07
・BIGSECURITYHOLEオプションでapacheをrootで動作させる。
・外部コマンドを実行するプログラム(setuidされた)をmod_perlから呼び出す。
・sudoを使う
思いつくのはこんぐらいかな。
454:446
07/08/24 23:47:48 IBL+ZrlN
>>453
ありがとうございます。
apacheをrootで動かすのは怖くてできません＞＜；
2つ目のプログラムを分けてmod-perlから呼び出すプログラムに数値を渡すにはファイル書き込みか何かで渡す他ないんですよね？
これならできそうです。
3つ目のsudoは
perlプログラム内（test.cgi)に以下の外部コマンド
`script /dev/null -q -c 'sudo -u root /home/vpopmail/bin/vadduser -r hoge\@hogehoge.com'`;
visudoにて以下を追加
apache ALL=(root) NOPASSWD: /var/www/test.cgi
で実行してみましたが、secureログには
sudo: pam_unix(sudo:auth): authentication failure;
と出ます。sudoがシンプルで良いと思っているのですが、認証失敗は何が原因でしょうか？
455:446
07/08/24 23:57:13 IBL+ZrlN
あ。test.cgi自体をsudoで動作させなきゃ意味ないですよね。
どうしたらtest.cgiをsudoで動作させられるんでしょう？＞＜；
456:nobodyさん
07/08/25 02:55:37
それはperlと関係ない話だからなぁ
sudoでググれば普通にわかるべ
つーか、そもそもmod_perl使わなきゃいいだけの話じゃないのか？
そんな何回も実行するようなもんじゃないし、危ない橋を渡ることもあるまいに
457:446
07/08/25 03:35:05 YKfJDMUn
あ。解決しました。
visudoには
apache ALL=(root) NOPASSWD: /home/vpopmail/bin/vadduser
ですね。
教えてくださった方々ありがとうございました。
458:nobodyさん
07/08/25 07:04:35 uu0LXyl+
URLﾘﾝｸ(icomu.jp)
459:nobodyさん
07/08/25 08:17:45 XkW9fGs3
URLﾘﾝｸ(inoken.tv)
460:nobodyさん
07/10/08 21:00:42
さげさげ