|
携帯電話に対してこちらの電話番号を表示しないためにはどうすればいいですか？ |
|
perlでのサブルーチンの質問です。 お願いします。 #!/usr/local/bin/perl $Z = 1; &abc(); print "$Z$Y"; sub abc{ &A(); &B(); &C(); } sub A{ if($Z == 1){ $Z = $Z + 1; &C(); } } sub B{ $Z = $Z + 5 ; } sub C{ $Y = "!"; } こんなカンジなのですが結果を"2!"になるようにしたいのですが どうすればよろしいでしょうか？ このまま実行すると"7!"になってしまいます。 教えてください。 |
|
＠yujiさん > 現在、FreeBSD 2.2.8-RELEASEのカーネルなどをPentium3に最適化させたいと > 考えているのですが すみませんが、http://www.jp.FreeBSD.org/search.html#doc で キーワード pgcc で検索する、以上の情報はわかりません。 cvsweb で ports/lang/pgcc を見ると、2.2.8 時代は (pgcc 側の) gcc->egcs の切り替え時期なようで、その時代の gcc 対応 pgcc は ないと思います。最新の egcs を入れて pgcc パッチを当てるのは ダメかなぁ。いろんなところではまりそうですけど。 # あ、最近のは a.out 形式吐けないんだっけ。 ＠STさん > これからはもっと慎重に作業をしなければ……。 telnet 2つ開いて、片方はつなぎっぱなしにして いつでも /etc/master.passwd を修正できるようにしておくとよかったですね。 ＠mmさん # biglobe な mm さんとは別の mm さんですか? > 結果を"2!"になるようにしたいのですがどうすればよろしいでしょうか？ sub B{ $Z = $Z + 5 ; } の部分で $Z==7 になってほしい、でも &B から戻ると $Z==2 としたい、 ということなら、呼び出し側で &B($Z) として引数を渡して sub B{ my ($abc)=@_; $abc = $abc + 5 ; } とか ($abc は $Z としても同じ)、単順に変数名を変えて sub B{ $X = $Z + 5 ; } とか、って感じでいいですか。 望んでる答えじゃないかもしれないけど、なぜ 2! にしたいのか、 &A と &B ではどういう違いがあるのかを説明してもらわないと、 これ以上はなんとも言えません。 |
|
私にも意味が分からないので、別人かと思われます。 ひょっとして、sub A {...} 中で &C(); を呼び出したら、 sub abc{...} 中の &C(); に帰って来る、と誤解されてるとか…？ # goto &NAME に関係あるのかとも思ったけど… |
|
># biglobe な mm さんとは別の mm さんですか? mm@biglobeさん、失礼しました。 説明不足ですみませんでした。 sub A の処理で $Z == 1 の場合sub C へ行きたいのです。 その後、sub B へは行かずに処理を終了させたいのですが、、、 |
|
もしかして #!/usr/local/bin/perl $Z=1;&abc;print "$Z$Y"; sub abc{ if (!&A){ &B; } &C; } sub A{ if ($Z==1){ $Z++;return 1; } 0; } sub B{ $Z+=5; } sub C{ $Y="!"; } な感じですか...? 文章のままだと sub abc{ if (!&A){ &B;&C; }} sub A{ if ($Z==1){ $Z++;&C;return 1; } 0; } な感じです．関数の戻り値を使わないなら sub abc{ &A; if ($Z!=2){ &B; } &C; } sub A{ if ($Z==1){ $Z++; }} 延々と続きそうですね．こんな話題じゃ無さそうな気も... |
|
あれ？mmさんの反応がないなぁ… Netboyさんの回答で、出尽くしてると思うんだけど。 |
|
そーいや、名前に機種依存文字を入れると、何かが起こったっけ。 多分まだ なおしてなかったなぁ。 # 現在機種依存文字が見えない環境なので、勘で入力。 |
|
そうか、名前の欄が <INPUT ... VALUE="<FONT COLOR="red">(6)(8)</FONT>user"> となってしまうんだった。今度直そう。 ところで、LASER5 Linux 6.0 でも /etc/services は pop-3 でした。 |
|
＠68user 名前に機種依存文字入れたときの不具合、 直ったら修正部分をおしえてください。 #うちのにも同じ不具合があるってことですよね? |
|
了解。でも、ちと忙しい日が続きそうなので9月頃になるかも…。 |
|
こんばんわ。ちょっとお聞きしたいことがありまして。。。 うちの掲示板はmmさん（ここにいる人かどうかはわかりませんが）が作った掲示板を使っているんですが、 crypt関数が使えなくて削除パスとかが出てこないんです。それで、サーバ管理者に連絡しましたら、 ＞弊社サーバーでも、crypt関数はもちろんご利用頂けます。 ＞ただし、サーバーの暗号処理にMD5方式を搭載しておりますので ＞MD5以外のサルト係数を使用したスクリプトでは、そのままでは動作致しません。 ＞（cryptはサーバーのライブラリに依存している為） ＞cryptをMD5方式のサーバーでお使いになるには、salt係数をMD5の ＞$1$ 固定で指定する必要がありますので、スクリプト内の ＞該当部分を書き換えてご利用ください。 と教えていただきました。でもどこをどう直せばいいのかさっぱりなんです。 忙しいと言っていますけどもし時間が空きましたら、教えていただけますでしょうか。お願いします。 ちなみにhttp://whitenight.org/etc/bbs/Readme/crypt.cgiにcryptを実行するCGIがあります。 ソースはhttp://whitenight.org/etc/bbs/Readme/crypt.txtにありますんで、どうかみてやってください。 長文すいませんでした。 |
|
あっ、crypt.cgi はMD5には対応してないですね(^^; MD5を使える環境にないので、詳しくは、68userさんのご助言を頂きたいのですが、 とりあえず、ソースの以下の行を削除して、 if ( $salt !~ m%^[\./0-9A-Z]{2}$%i ) { print "<H2>エラー</H2>\n"; print "SALTが不正です\n"; exit(0); } SALTの入力欄の２文字の前に「$1$」を挿入して実行してみて頂けます？ |
|
まず OS 名は何ですか? >>（cryptはサーバーのライブラリに依存している為） 僕の知る限りでは (少なくとも FreeBSD では) 誤りです。 なんにも考えずに salt を渡せば、ライブラリ (libcrypt) の 方で DES でも MD5 でも勝手に処理してくれます。 # ただ、FreeBSD 以外の環境 (例えば Linux で MD5 な環境) だと、 # ライブラリがそこまで対応しているかどうかはよくわからんなぁ。 # 明日試してみよう。 しかし、http://whitenight.org/etc/bbs/Readme/crypt.cgi の 結果が $PassWord = ''; と空になるのは謎ですね。 > print crypt( $pwd, $salt ); これを print crypt( $pwd, "\$1\$$salt\$" ); とするとどうですか。あるいは print crypt('secret','ab'); だとどうなりますか。 |
|
おっと少々かぶりぎみ。 crypt.cgi は FreeBSD (MD5) 上ではうまく動きました。FreeBSD の libcrypt では crypt('secret','xx') と crypt('secret','$1$xx$hogehoge') は同じものとして扱われるからです。 ということは、智慧さんの環境ではそうではないということで しょうから、$1$..$ を追加すればいけるんじゃないかと思います。 |
|
あっ、なるほど。（最後の $ も忘れてた） 68user さんの指示に従って対処して下さい＞智慧さん |
|
＞mm@biglobeさん ＞68userさん あ、ごめんなさい。 こんなに早くお返事してもらえるとは思ってもいませんで・・・。 じゃ今から早速やってみます。 レスありがとうございました。 |
|
あ、順々にやらせてもらったんですが、もう最初のmm@biglobeさんの言ったとおりに、 一部分削除して、 ＞$1$ これを前に入れて５文字で実行したらちゃんと生成されました！ ＞まず OS 名は何ですか? あとこれは結局わからないです・・・（汗） お手間を取らせまして・・・。ほんとどうもありがとうございました。 |
|
ラウンジでは、いつもお世話になっていました。ありがとうございました。 ラウンジで質問ができないので、こちらへ質問させてもらいます。 UNIXにおいてflockを使用するデメリットを教えて下さい。 また、flock使用のＣＧＩを見つけるコマンドなど存在しますか？ 自サイトでCGIをフリー配布していますが、使っている人から、プロバイダでflockは、やめてくださいと通知されたそうです。 よろしくおねがいいたします。 |
|
ついでに、もうひとつ。 私の vi では、テキストファイルに一行 １０２４バイト以上の行があるとき 途中で切れて、全部見れません。 このような場合、「編集できない」と「多少のデータ欠落」はＯＫですが、 とにかく、全体を見れて、検索できるような、コマンドってないですか？ |
|
LASER5 Linux (標準で MD5) では、 crypt('secret','$1$xx$') -> $1$xx$r/r0qx2Q7FpBQWOTZk2Nc. (MD5) crypt('secret",'xx') -> xxWAum7tHdIUw (DES) となりました。こういう環境があるとは知らなかった。 > UNIXにおいてflockを使用するデメリットを教えて下さい。 NFS 環境下で flock が動作しないそうですが、僕のまわりでは NFS 環境でも正常にロックできていたように見えました。 それ以外はわかりません。プロバイダが「使うな」と言うほどの デメリットはないように思います。 > また、flock使用のＣＧＩを見つけるコマンドなど存在しますか？ これは質問の意図がわかりません。 > 私の vi では、テキストファイルに一行 １０２４バイト以上の行があるとき > 途中で切れて、全部見れません。 nvi という vi ファミリのエディタでは、その手の制限はなかった ように思います。ちなみに FreeBSD の vi は nvi だったりします。 > とにかく、全体を見れて、検索できるような、コマンドってないですか？ nvi 以外だと less かなぁ。less で 1024バイト/行なファイルを 見られるかどうかは確かめてませんが。まぁ、fold してその出力を 眺めるっつーのもアリかもしれません。 |
|
大学では、UNIXを使っているので、いつもこのHPにはお世話になっております。 それで、質問があるのですが。 UNIXでは、Windowsなどから送られてくる添付ファイルを 受けとる事はできますか? また、添付ファイルを送る事はできますか? よろしければ、そのやりかたも教えて頂けると嬉しいです。 ちなみに、使用機種は、SunOS 5.6です。 |
|
＞68userさんへ foldコマンドでいけました！ ありがとうございました。 >>また、flock使用のＣＧＩを見つけるコマンドなど存在しますか？ >これは質問の意図がわかりません。 ただ、プロバイダがどうやってflock使用のプロセスを見つけたのかなぁっておもったもので...。 では、これで、失礼いたします...。 |
|
> プロバイダがどうやってflock使用のプロセスを > 見つけたのかなぁっておもったもので...。 grep? > UNIXでは、Windowsなどから送られてくる添付ファイルを > 受けとる事はできますか? また、添付ファイルを送る事はできますか? メーラー次第です。Mew や Wanderlust あたりなら できますが、emacs の rmail とか mail コマンドでは 難しい…というか多分無理でしょう。 # Mew ... http://www.mew.org/index-j.html # Wanderlust ... http://www.gohome.org/wl/index.ja.html |
|
NFS上のファイルをflockすると，複数マシンから 同時にロックできてしまう(場合がある)と思いますが... Perlで普通にflockを使っていると，たいがい まともにロックできないうえ処理速度が遅くなります． open (LOCK, "> $file")||&error flock (LOCK,2)||&error とか書いた時点で終わってます．2箇所直せば使えますけど 普通そんなこと気付きません． あと，デッドロックの発生を検知するのが難しいです． |
|
68userさん> 御回答ありがとうございました。 僕のメーラーはemacsのrmailなので、受けとれないみたいですね。 文章の添付ファイルならば、その文章は一応表示されますが。 それで、御紹介頂いた Mew と Wanderlust のHPに行ってみたのですが、 その2つの違いというものがよく解りません。 よろしければ教えて頂けますか。 用途は、添付ファイルを受けとるだけなので、それに適しているのは どちらなのかというのも教えて頂けると嬉しいです。 あと、もう一つ質問なのですが、 あるファイルのシンボリックリンクを作った時に、 そのシンボリックリンクの元となるファイルから、 そのファイルのシンボリックリンクがどこに作られているかを 見つけ出す事はできますか? なんか解りにくい文章ですみません。 |
|
> それで、御紹介頂いた Mew と Wanderlust のHPに行ってみたのですが、 > その2つの違いというものがよく解りません。 両方ともメーラーなわけで、できることは自然と似てきます。 一応僕の思う特徴をあげると Wanderlust のいいところ ・見栄えがきれい (スクリーンショット参照) ・IMAP4 対応 ・ニュースリーダの機能もある Mew のいいところ ・im と mew を入れるだけなので、インストールが簡単 (Wanderlust だと semi やら apel やら入れて、さらに それぞれのバージョンにも気をつけなくてはいけない) てな感じ。インストールに自信がないなら Mew の方がいいかも しれません。 ちなみに「添付ファイルを受け取る」という一点に関して言うと、 Mew の方が使いやすいように感じます。 > そのファイルのシンボリックリンクがどこに作られているかを > 見つけ出す事はできますか? 無理です。全ファイルを調べるしかないです。これはハード リンクも同じです。 > NFS上のファイルをflockすると，複数マシンから > 同時にロックできてしまう(場合がある)と思いますが... んー、なるほど。複数マシンからの flock というのは全く 思いつきませんでした。一つの NFS クライアントマシンから flock して、「ああ、NFS でもうまくロックできるのね」と 思ってました。 試してみたいけど、NFS 環境がないなぁ・・・ |