68user's page 掲示板

Prev< No. 696〜706> Next  [最新発言に戻る] [過去ログ一覧]
No. 696 # ゲノ 2000/02/01 (火) 16:40
質問があります。よろしくお願いします。
% ls ファイル名 
とした時に該当ファイルが無かった場合
ls:No match.
と出ますがこのメッセージを出さない方法が
ありましたら教えて下さい。

No. 697 # 68user [URL] [E-mail] 2000/02/01 (火) 18:40
> C++で作成したDLLを、UNIX上で使えるようにしたいのです。
Windows は全く知りませんが (DLL ってランタイムライブラリ
ですよね? というくらいしか知らない)、DLL を UNIX に
持ってくるのはさすがに無理でしょう。

C++ のソースを持ってきて、ar でアーカイブ作るか、ld で
ランタイムライブラリを作るのがまっとうな方法だと思います。

> ls:No match.
> と出ますがこのメッセージを出さない方法
「No match」が出るのは
    「tcsh で、ワイルドカードを使って、マッチしなかったとき」
だと思いますが、
    % (ls hoge* >/dev/tty) >& /dev/null
で、標準エラー出力をリダイレクトするとか、
    % set nonomatch
    % ls hoge*
として、マッチしなかったときにエラーにさせないようにするとか、
    % set noglob
    % ls hoge*
として、最初からワイルドカードを展開させない、などの方法があります。

No. 698 # Fu [E-mail] 2000/02/01 (火) 20:39
はじめまして。
perlでメールを受信する方法を調べていたところ、こちらの掲示板を
発見しました。
お尋ねしたいことは、pop3サーバーからメールを受信し、そのメールの
添付ファイルをWindowsのフォルダに保存する方法です。
UNIXやCGIの経験が全く無い素人なもので、なかなかうまくいきません。
参考になるURLや書籍等もありましたら教えていただけないでしょうか。
OSはWindowsNT4.0又はWindows95です。
宜しくお願いします。

No. 699 # 68user [URL] [E-mail] 2000/02/01 (火) 21:22
POP へのアクセスは
    http://X68000.startshop.co.jp/~68user/net/
を読んで下さい。

multipart メールをバラすのは、perl の MIME-tools モジュールで
できそうな感じです (試したことないので)。わからなかったら
また質問して下さい。

No. 700 # 68user [URL] [E-mail] 2000/02/01 (火) 21:33
> multipart メールをバラすのは、perl の MIME-tools モジュールで
perl の MIME-tools、IO-stringy、MailTools モジュールを
入れて、perldoc MIME::Parser のサンプル通りやってみたら
あっさりできました。モジュールに頼ると簡単だなぁ。

No. 701 # ももんが 2000/02/02 (水) 08:39
: : 信じられないけど本当の話。  
: : 私はある日BBSで1000円が200万円に、、、とかいてあるのを見た。
: : 200万円ものお金が郵送されてくると書いてあった。
: : まさか、そんなには、、、と思ってはみたが、
: : やらなきゃ何もはじまらない、まぁ、何もなくて1000円くらいの損だし、、、
: : ま、数万くらいは、、、、。と、思っていた。
: : (ホントに軽い気持ちで)だから、そのBBSのとおりにやってみた。

: : 私がやったことは、書き換えたファイル(この文書です)を
: : ニュースグループやBBSの電子掲示板などに(!!出来るだけ多くの!!)
: : アップロードした。
: : そして私はお金が来るまでどきどきしながら待っていた。
: : 私は10万円や15万円ぐらい来る時しまうところを確保していた。 
: : でも、、、。お金の入った封筒がどんどん郵便受けに入ってくるのには、
: : 仰天した。!! さて、私にいくらお金が送られてきたでしょう?
: : 10万?20万?50万?私は合計!!!約200万円!!!嘘、、、、、。
: : このお金を目にしてまだしんじらんないって感じ!!!

: : さて、その具体的な方法を書きます。ちゃんとファイルに保存しておくと良いよ。
: : あとで役に立ちます。君が払わなくてはいけない物は、5枚の切手、封筒、1000円。
: : それを、リストの5人に、合法的に現金を送る方法で送る。そして、君の名前と
: : 住所が書いてある方のファイルをいろいろなところにアップロードする。
: : そうしたらたった1000円あげるだけで150万円から250万円の戻りが3〜5週間で
: : 届きます!!!!

: : では具体的にどうすれば良いか?
: : * **名前と住所のリストは最後にあります。***
: : まず一枚の紙に「私をあなた方のリストに入れてください。」これを書くことにより、
: : このスーパーマネーシステムは成り立ちます。(合法になります。) 
: : あなたは200円をランダムに払うのではなくこのシステムに払うのです。
: : そうそう、紙に自分の名前と住所とあなたが出す人はリストの何番目にいたかを
: : 書きます。
: : 1.(あなたはリストでは、○番目にいました)と、書きます。
: : 2.(1)で書いた紙を200円にまきつけましょう。そして封筒に入れ、
: :  リストに書いてある5つの住所に送る。 紙を200円に巻きつけて、  
: :  200円を見えなくするのにはワケがあります。 
: :  郵便で現金を送ってはいけないのだ。郵便局に行って200円の5枚にしても良い。
: :  手数料10円。小為替だったらまく必要がないよ!

: : * *このステップは重要です。**
: : 3.さて、ここからが重要。よく読んで、システムを理解してね。
: :  一番上の人を消す。そして他の皆のポジションを一つずつ上げる。
: :  つまり、ポジション2の人をP1に、P3の人をP2に、P4の人をP3に、P5の人をP4に
: :  かえるということ。そしてポジション5に君の名前、住所、郵便番号、国を
: :  書きこむわけ。
: : 4.そして(3)で変えたこれのファイルをいろいろなところに出来る
: :  だけたくさんアップロードします。  

: : アップロードしたぶん自分に跳ね返ってきます。
: : 自分と他の4人にもお金が入ることになります。

: : さて皆さん、リストについては正直にしましょう!! 
: : 汚い事しなくても、お金はいっぱい入るから。ウソは絶対に辞めましょう。OK?

: : 5.ここまできたらもう後は人生楽しみましょう。
: :  お金は着々と君の郵便受けに入ってきます。

: : 初めて2週間くらいからお金が入りはじめて3〜4週間目にはお金の台風が君の
: : 郵便受けを襲います。 びっくりして叫ばないようにね。
: : お金がなくなってきたら又既に書き換えたファイルに(4)〜の行程を繰り返しましょう。
: : 絶対にこのファイルはなくさないように。
: : 何度でも使えるから。参考にしてください。
: : 名前と住所のリスト正直がこのプログラムを成功させる!!!

: : 1. 横山美由紀 〒193-0932東京都八王子市緑町401−105
: : 2. 波多野絵梨 〒860-0085熊本県熊本市高平2-16-5
: : 3. 浦西弘明 〒524ー0101滋賀県守山市今浜町2620-14-216
: : 4. 村上健一 〒014-0722秋田県仙北郡中仙町豊川字下延17-2
: : 5. 小関リノ 〒080-0834北海道帯広市稲田町西1線5番地115

: : あなたに全くマイナスはありません!!!!
: : 君にお金を送ってきた人の名前はなくさないようにしたほうが良いでしょう。 
: : みんなで公平にこのシステムを使いましょう。

: : 最後に:正直がこのシステムを成功させるのです!!!
: : もしもあなたがお金をリストの五人に出さない卑怯者だったらあなたはあまり
: : お金をもらえない。私は誰かがお金をリストの五人に送らなかったので3万円(2ヶ月後に)
: : しかもらえなかったのを知っている。それからお金をリストの5人に送ったのでリスト
: : の人たちは彼をリストに入れてあげた。そして4〜5週間後に彼は200万円以上手に入れたのです。 
: : これは本当の話ですよ!!! (ちょっとびっくり)
: : だまされたと思って1000円出せばすごい大金が手に入ります!!!(上記のことから)
: :  このチャンスを大事にしましょう!!!

No. 702 # Ta [E-mail] 2000/02/02 (水) 12:08
はじめまして。Taと申します。

whois.cgiに関して、お聞きしたいことがあるでのすが、もしよかったら教えて下さい。

私のISPは、LINUX(Redhat)を使用しているため、68Userが作られたcgiのスクリプトの
一部を変更しなければならないことに気が付きました。

オリジナルでは、'whois -h whoisserver domain'となっていますが、Linuxでは、whois
コマンドのパラメーターが違うようで、'whois domain\@whoiserver'('whois domain@whoiserver'というパラメーターも見たことがあるんですが)ということなので、スクリプト内の以下の部分のみを変更しました。


#変更前

$ret = `$whois -h $nics{$nic} $domain`;

#変更後

$ret = `$whois $domain\@$nics{$nic}`;


これにプラスして、当方のISPでは、'whois'が、'/bin'にあるので、'environment.pl'の'$whois'のパスも'/bin/whois'に変更しました。

ところが、サーバーエラーが出てしまいます。ISPで用意してあるデバックの機能(web
から行う)を利用してみたところ、以下のような結果がでました。

-----------------------------------
TEST 1: script and permissions
Passed Test 1!

TEST 2: script file format
Passed Test 2!

TEST 3: check perl path
Passed Test 3!

TEST 4: perl syntax
      String found where operator expected at t_whois.cgi line 45, near "print ""
          (Might be a runaway multi-line "" string starting on line 33)
       (Missing semicolon on previous line?)
      syntax error at t_whois.cgi line 45, near "print ""
      t_whois.cgi had compilation errors.

Your script failed one or more of the tests and could not
be automatically corrected. Please correct the errors
listed above and try again.
-----------------------------------

調べてみたところ、おそらく、変更した部分のが関係すると思うのですが・・・
原因がよく分かりません。

もし、解決方法をご存知でしたら、ご指導頂ければ助かります。

Ta

No. 703 # 68user [URL] [E-mail] 2000/02/02 (水) 13:34
> (Might be a runaway multi-line "" string starting on line 33)
> (Missing semicolon on previous line?)
「33行目から始まる "" が閉じてないのではないか?」
「前の行の最後にセミコロンを付け忘れていないか?」
ということでしょう。

> $ret = `$whois $domain\@$nics{$nic}`;
これ自体は問題ありません。

No. 704 # Ta [E-mail] 2000/02/02 (水) 14:39
68Userさん、早速のお返事有り難うございます。
スクリプトは確認したと思うのですが、再度、確認してみます。
もし、また分からないことがあれば、お聞きするかもしれませんが、
よろしくお願い致します。

Ta

No. 705 # Ta [E-mail] 2000/02/02 (水) 20:58
度々すいません。Taです。スクリプトにミスがありました。その後、デバックをしてみると、全てパスしました。

TEST 1: script and permissions
Passed Test 1!

TEST 2: script file format
Passed Test 2!

TEST 3: check perl path
Passed Test 3!

TEST 4: perl syntax
      t_whois.cgi syntax OK
Passed Test 4!

Your script has passed all 4 tests.

If your script passes these tests, and still won't run,
you might look for one or more of these common problems:
      1) make sure it can find any files or external programs it needs
      2) make sure any included perl programs also check out
      3) make sure you are writing a "Content-type:" line
            at the beginning of your output
Consult your favorite Perl/CGI book for more information.

これで動くかと思ったら、Internal Server Error・・・
う〜ん、なんでだか分かりません。environment.plは、$whoisのパスを修正するだけで、いいはずですよね。

何か、チェックしてみるところがあったら教えて下さい。

Ta

No. 706 # 68user [URL] [E-mail] 2000/02/03 (木) 06:30
とりあえず、

> open(STDOUT,"|$nkf -j");
open(STDOUT,"| /usr/local/bin/nkf -j");
> &put_header("whoisしてみよう -- $domain --");
print "Content-type: text/html\n\n";
print "<HTML>\n<HEAD><TITLE>whoisしてみよう -- $domain --</TITLE></HEAD>\n";
print "<BODY ...(略)...>\n";
> &finish_work;
print "</BODY>\n</HTML>\n";

などと書き換えて、environment.pl なしで動くようにしてみて下さい。

それはそれとして なぜ動かないかというと、CGI 経由で実行した際に
environment.pl が読み込めているかどうかが気になります。
    if ( ! require 'environment.pl' ){
        print "Content-type: text/plain\n\nCan't load environment.pl\n";
        exit;
    }
てな感じでチェックするといいでしょう。

Prev< No. 696〜706> Next  [最新発言に戻る] [過去ログ一覧]