|
>>4788 べた ftp コマンドを使う限りは > すべてのFTP結果ログをファイルに出力し、該当の処理のエラーメッセージ > があるかないかをgrepでみるしかないのでしょうか。 が無難です。また、どのようなエラーがどこで発生したかをプログラム上で 突き止めようとせず、行頭の 4xx か 5xx にマッチするものがあれば全て エラーとすることをお勧めします。 これ以上を求めるならば、Perl + Net::FTP モジュールなどで FTP クライアントを 作成するのがよいとわたしは思います。 |
|
>> 4789 ありがとうございます。 必要な、エラーすべてをgrepしようと考えていました。 行頭の 4xx か 5xx にマッチするものがあれば全てエラー とするでやつてみます。 ちなみに、接続エラー（open）ですが、これは、4xxとか5xx にならないのですが、メッセージの内容で見た方がよいの でしょうか。 |
|
>>4790 べた > ちなみに、接続エラー（open）ですが、これは、4xxとか5xx にならないの > ですが、メッセージの内容で見た方がよいのでしょうか。 数年ほど前に同じようなことをやっていましたが、そのときはどうやったの だったか…。 ・ftp コマンドの終了ステータスが >0 ならエラー ・2xx がひとつもなかったら認証以前で失敗とみなしてエラー のいずれかだったような気がします。 |
|
>>4791 68user >・ftp コマンドの終了ステータスが >0 ならエラー >・2xx がひとつもなかったら認証以前で失敗とみなしてエラー ありがとうございます。 なるほど、2xxがなかったらですか。 確かに、接続エラーということは、レスポンスコードが出てなかった ので、レスポンスコードがなければで良いかも知れません。 UNIXのOSによるかも知れませんが。 環境は、Solaris8 です。 |
|
AIX5.3の環境にて下記のようなファイルシステムをマウントしています。 /app /app/log auto mount=trueの設定です。 OS再起動後、/appがマウントされていなかったので、/etc/filesystemsを 確認したところ、/app/logの定義が/appの定義よりも前に記述されいたため、 /app/logが先にマウントされてしまい、/appのマウントに失敗したようです。 一旦、/app/logをアンマウントし、/app, /app/logの順番でマウントしました。 次回の再起動時に正常にマウントできるように、/etc/filesystemsを直接、 編集して正しい順序に設定しようと考えていますが上記ファイルシステムが マウントされたままの状態で作業を行なっても大丈夫か教えて頂けますでしょうか？ |
|
>>4793 保守見習い AIX は知りませんが、マニュアルを読む限りでは他 UNIX 系システムの /etc/fstab と同様に、 ・ブート時の mount 順序を決める ・ブート時の mount の設定を記述する ・mount コマンド実行時に各種オプションが省略された場合の デフォルト値を記述しておく という役割のようなので問題ないでしょう。 http://publib16.boulder.ibm.com/doc_link/Ja_JP/a_doc_lib/files/aixfiles/filesystems.htm |
|
>>4794 68user ご意見ありがとうございます。 ファイルシステムをマウントしたまま、/etc/filesystemsを編集し、 問題なく無事作業が完了しました。 |
|
おひさしぶりです。 わからないことができると質問しに現れてすみません。 よろしくお願いします。 C:\>perl -v This is perl, v5.8.8 built for MSWin32-x86-multi-thread (with 50 registered patches, see perl -V for more detail) Copyright 1987-2006, Larry Wall Binary build 820 [274739] provided by ActiveState http://www.ActiveState.com Built Jan 23 2007 15:57:46 で、以下のようなプログラムを書きました。 -------------------------------------------------- Foo.pm #! perl -w use strict "subs"; package Foo; use base Exporter; our @EXPORT = qw($bob); our $bob = "#123456789"; 1; -------------------------------------------------- bar.pl #! perl -w use strict; use Foo; print "bob: $bob \n"; すると、以下のようなエラーになります。 C:\>bar.pl Unknown error Compilation failed in require at C:\bar.pl line 6. BEGIN failed--compilation aborted at C:\bar.pl line 6. Foo.pm の use strict 'subs'; を無効にするとなぜか正常に動作します。 C:\>bar.pl bob: #123456789 何が悪いかお分かりでしょうか。 別に use strict 'subs' をやめればいいじゃん・・・ というハナシなんですが、 実際の元のプログラムはもっと大きくて（当たり前 ;;;）、 use strict; でずっとやってきていたので・・・。 何かわかりましたらよろしくお願いいたします。 |
|
追記です。 どうも use base Exporter; が use strict 'subs' に引っかかるらしく -------------------------------------------------- Foo.pm #! perl -w package Foo; use base Exporter; use strict "subs"; our @EXPORT = qw($bob); our $bob = "#123456789"; 1; だと動作します。あと use base をあきらめて -------------------------------------------------- Foo.pm use strict "subs"; package Foo; use Exporter; our @ISA = qw(Exporter); our @EXPORT = ('$bob'); our $bob = "#123456789"; 1; でも動作します。 ううーん。 |
|
kqueue の説明の所 timeval は tv_sec, tv_usec で分解能 10^-6 == micro second timespec は tv_sec, tv_nsec で分解能 10^-9 == nano second 実際の分解能は処理系依存 |
|
awk/nawkを使って編集をしています。 ファイルから読み込み、読み込んだ内容を判断して printf関数を使って表示しています。 例えば { \ printf("XXX:%s\nxxx:%s\nxxx:%s\n・・・・\n", \ $1,$2,$s・・・・); \ } \ のように、値の前にコメント付けて表示しています。 この表示内容を追加したところ、 「Word too long」 のメッセージが出力され動かなくなりました。 メッセージの通り、printf関数で表示する内容が長すぎるためだと 思うのですが、原因は、その通りでしょうか。 実際、何バイト（何文字）までなのでしょうか。 また、対処するにはどうしたらよいのでしょうか。 環境は、 Solaris8、csh |
|
>>4799 べた 補足です。 メッセージの通り１行が長いのがいけないのではと フィールドごとに表示しようとしたのですが、 例えば { \ printf("xxx:%s\n",$1); \ printf("xxx:%s\n",$2); \ printf("xxx:%s\n",$3); \ : : } \ やはり、 「Word too long」 のメッセージが出力され動かなくなりました。 |
|
はじめまして。 最近openSSLを使用することになったので勉強しています。 非常にいい内容で助かっています。 それでですねrsaを使用する際のサンプルを一度コンパイルしてみたのですが… RSA_generate_keyをはじめとする、約25個の関数が未定義と起こられてしまいました… これはハードウェア的な問題なのでしょうか？ ちなみにlinuxにtelnetで接続しながら作っています。 よろしくお願いいたします。 |
|
>>4800 べた awk スクリプトを別ファイル（以下の例では hoge.awk）にして $ awk -f hoge.awk fuga.txt のようにしてもダメですか？ |
|
>>4800 べた 書き忘れましたが、別ファイルにする場合は 行末の "\" は削除してください。 |
|
はじめまして。 サーバ関係の情報を探していて、ここにたどりつきました。 下記のようなPOPサーバの改造は可能でしょうか。 ネット上を探してみたのですが、情報が少なく、 参考になるサイト等ご存知でしたら、ご教授ください。 よろしくお願い致します。 【現状】 POPクライアントの拡張コマンド内で、 ユーザID等をべた書きして、サーバにリクエストしている。 【改造】 現在クライアントにて上記のべた書きしている箇所をプロパティファイル とする。POPサーバを改造し、このファイルを読み込むようにする。 |
|
>> 4803 ありがとうございます。 上手くいきました。 |
|
>>4805 べた それで OK だったということは awk ではなく csh の制限に引っかかっていたようですね。 恐らく awk のスクリプト部分を \ で複数行つなげていたので 一行に記述できる制限（1024文字）を超えたのでしょう。 |
|
はじめまして。 Perl CGIで基本認証をクリアーするやり方は分かっているのですが、 IEに事前に基本認証をクリアーさせるための設定方法が分かりません。 perlから、IEに対して、ヘッダーとして下記を書き込んでも、だめなんですね。 print "Authorization : Basic Base64文字列\n"; かならず、認証画面が表示されます。 IEに何を書き込めば良いのでしょうか。ご教示をお願いします。 |
|
>>4798 通りすがりのプログラマ ありがとうございます。バグ ID 28 として記載いたしました。 近日中に直します。 http://spreadsheets.google.com/pub?key=pAr6UVKFG0jthbVP572cKEA&output=html |
|
はじめまして、'斎藤 誠'と申します。 初めての投稿で質問する不躾をお許しください。 とある理由からpop3クライアントを試しています。 pop3-client.pl pop3-client-Net::POP3.pl 双方を試してみまして、後者の方を使用したいと思っています。 当方の環境はFedora7です。小生自身は初心者です。 いわゆる自宅サーバで試しているのですが、 当方が別のIPで設置しているtest-pop3.server(以下、前者)と 目的のpop3.server(以下、後者)とで応答が異なっていることで困っています。 双方ともtelnet接続では正常な応答をしています。 ちなみに前者はFedora core 6でdovecotです。 pop3-client.plにて接続すると、前者がエラーで後者が正常応答です。 これに関してはNo.2380の sleep 1; を挿入したらうまく動きました。 pop3-client-Net::POP3.plにて接続するとpop3-client.plの場合とは 逆に前者が正常に応答して後者はエラーとなります。 今日一日費やしてみましたが、解決できません。どなたかにご教授願いただきたく 投稿しました。なお、初心者ですので何卒お手柔らかにお願いいたします。 |
|
>>4796 ふくし > use base Exporter; うちでは use base qw/Exporter/; とすることで動きましたがどうでしょうか。 >>4804 pixy > 現在クライアントにて上記のべた書きしている箇所をプロパティファイル > とする。POPサーバを改造し、このファイルを読み込むようにする。 前提条件がよくわかりませんが、ソースがあるとして改造が可能か と問われれば「可能です」が答えです。 >>4807 Perl使い > print "Authorization : Basic Base64文字列\n"; Authorization ヘッダはクライアントがサーバに送信するものなので、 根本的に誤解があるようです。 http://x68000.q-e-d.net/~68user/net/http-auth-1.html 以下のような CGI プログラムを使うことで、疑似的にログアウト することもできます で実現できませんか? あと、別解として http://username:password@example.com/foo/ に飛ばす方法もありますが、IE の場合は設定変更が必要です。 http://support.microsoft.com/default.aspx?scid=kb;JA;834489 >>4809 mac pop3-client.pl は実用に耐えるものではないので、pop3-client-Net::POP3.pl を 使ってください。で、pop3-client-Net::POP3.pl の $pop = Net::POP3->new($hostname); を $pop = Net::POP3->new($hostname, Debug=>1); としてデバッグ情報を表示してみてください。 あと、Net::POP3 の方でエラーになるサーバの POP3 サーバソフトウェア名と バージョンは何でしょうか? (qpopper など) それと「エラーになる」というのは具体的に何がどうなるのでしょうか。 代替案としては Mail::POP3Client http://search.cpan.org/~sdowd/Mail-POP3Client/POP3Client.pm を使う手もあります。 |
|
早々のお返事、有難う御座います。 エラーは「認証失敗: 」だったのですが、 ご教授の通りデバッガつけて起動させて見ましたところ Net::POP3>>> Net::POP3(2.28) Net::POP3>>> Net::Cmd(2.26) Net::POP3>>> Exporter(5.58) Net::POP3>>> IO::Socket::INET(1.29) Net::POP3>>> IO::Socket(1.29) Net::POP3>>> IO::Handle(1.25) Net::POP3=GLOB(0x9e97f44)<<< +OK Qpopper (version 4.0.4) at ******.jp startin g. Net::POP3=GLOB(0x9e97f44)>>> USER ****** Net::POP3=GLOB(0x9e97f44)<<< +OK Password required for ******. Net::POP3=GLOB(0x9e97f44)>>> PASS .... Net::POP3=GLOB(0x9e97f44)<<< +OK ****** has 0 visible messages (0 hidden) in 0 octets. Net::POP3=GLOB(0x9e97f44)>>> STAT Net::POP3=GLOB(0x9e97f44)<<< +OK 0 0 認証失敗: at ./pop3-client-Net::POP3.pl line 41. ということで認証は通っていたようです。mailが空だったということでしょうか。 お騒がせいたしました。line 41というのは多少いじったところもあって originalとは異なりますが、 $auth_check = $pop->login($username,$password); など、実質的な変更はしていないつもりでした。 ちなみにtelnet接続でのcapaの応答は +OK Capability list follows TOP USER LOGIN-DELAY 0 EXPIRE 0 UIDL RESP-CODES AUTH-RESP-CODE X-MANGLE X-MACRO X-LOCALTIME Fri, 20 Jul 2007 09:04:45 +0900 IMPLEMENTATION Qpopper-version-4.0.4 となっていました。 これからFTPなどもやってみるつもりですのでまたお世話になるかもしれません。 そのときはまたお願いいたします。 |