|
はじめまして。 perlを勉強中の者です。 いきなりで恐縮ですが、質問です。 perlのIO::SOCKETモジュールを使ったhttpクライアントを作っているのですが 画像を読み込めないんです。ちなみに、htmlはうまくいっています。 今作っている物では、他サーバーからファイルを読みとり 自分のサーバーに保存という作業をやらせたいんです。 しかし、画像ファイルを読み込むと改行が不要な位置に 改行入ってしまいます。 画像も読み込めるようにするにはどう作りかえたら良いのでしょうか？ ソース http://uchu.hypermart.net/image.txt |
|
>>2082 猫じゃらし ちゃんと環境を書きましょう。Windows ですか? 1. ヘッダもそのまま 2.gif に出力してしまう。 2. 改行が入ってしまうなら、Windows でテキストモードになっているのかも。 ということで、 # ヘッダまでを読み飛ばす while (<$remote>){ last if ( $_ eq "\n" || $_ eq "\r\n" ); } # ここからが画像データ while (<$remote>){ $outdata .= $_; } open(OUT, "> 2.gif"); binmode(OUT); print OUT "$outdata"; close(OUT); でどうでしょう。 foreach を使わず while を使うのは、foreach の () 内はリストを要求する ので、<$remote> はリストコンテキストで評価され、 foreach ("1行目のデータ", "2行目のデータ", ..., "最終行のデータ"){ と展開されてしまうからです。よって、 foreach (<$remote>){ last if ( $_ eq "\n" || $_ eq "\r\n" ); } の時点でファイルハンドル <$remote> から全てのデータを読み 切ってしまうので、last で抜けた後には <$remote> という ファイルハンドルにはデータが残っていません。 foreach (scalar(<$remote>)){ で強制的にスカラーコンテキストにするならいいんですが、 この場合は素直に while を使った方がよいでしょう。 |
|
>>68user 環境を書き忘れてすいません、マナー違反でしたね、、、 ちなみに、環境はWinMEでActivePerlを動かしている状態です。 さて、68userさんのレスにあったものをペーストして ソースは下のようになりました。 http://uchu.hypermart.net/image2.txt これで無事動かすことができました。ありがとうございます。 このＨＰは、これからも勉強参考にさせてもらいますね。 ではでは、、 |
|
はじめまして超初心者の者です。 質問なのですけど会社で渡されたＣシェルのプログラムに mailx -s というコマンドがありまして調べても見つかりません。 ＵＮＩＸのことなどさっぱり分からないので困っています。 知っている人がいたら教えてください。 お願いします。m(__)m |
|
>>2085 kazu ちゃんと OS 名やバージョンなどの情報を書きましょう。 > mailx -s mailx は SystemV 系 UNIX のコマンドです。Linux にも あるようですが、*BSD にはないはずです (FreeBSD なら ports で mail/mailx がありますが)。 まぁメールの送信だけなら mail も mailx も同じようなもの なので、そのまま mail に読み変えればよいでしょう。 |
|
はじめまして。早速なんですが、UNIXの運用について質問があります。ログインユーザーごとに使用したい文字コードが違うんですが、どのように設定したらよいのでしょうか？教えてください。 |
|
>>2087 sato.k ログインユーザごとに ~/.cshrc や ~/.profile で setenv LANG ja_JP.eucJP とか LANG=ja_JP.eucJP; export LANG とか書くか、/etc/profile や /etc/csh.cshrc でユーザ名をみて 適切な locale を設定するのはどうでしょうか。 具体的な locale 名や、/etc/ の下のファイル名などは OS によって違いがあるので、お使いのシステムではどうなって いるか確認して下さい。 FreeBSD なら /etc/login.conf に各ロケール分のログイン クラスを作るのもいいかな。 |
|
>>2079 るは > こちらに掲載されているC言語のechoプログラム（echo-server-1.c）を > そのまま書き写して実行したのですが、先頭の１文字しか返ってきません。 遅くなりましたが、さきほど直しました。 http://X68000.startshop.co.jp/~68user/cgi-bin/cvsweb.cgi/public_html/net/sample/echo-server-1.c ご指摘ありがとうございました。 |
|
UNIX の部屋をやっと CVS に突っ込みました。悲願達成。 http://X68000.startshop.co.jp/~68user/cgi-bin/cvsweb.cgi/public_html/unix/ これで思う存分更新ができます。 - コンテンツをローカルでも修正し、web サーバでも修正して、 どっちが最新版かわからなくなる - 前回から更新した部分はどこだったろうか? と忘れてしまう という経験がある方は、CVS で管理してみてはどうでしょうか。 僕はもう CVS なしでは生きていけません。 なお、普通は http://X68000.startshop.co.jp/~68user/cgi-bin/cvsweb.cgi/ のように cvsweb でリポジトリ公開なんてことはしません (笑) 公開しなくても CVS で管理できます。 |
|
>> こちらに掲載されているC言語のechoプログラム（echo-server-1.c）を >> そのまま書き写して実行したのですが、先頭の１文字しか返ってきません。 >遅くなりましたが、さきほど直しました。 \nの所に\0を書き込んでる気がします。 |
|
#2091 >\nの所に\0を書き込んでる気がします。 よく見たら、そんなこと有りませんでした。 訂正します。 |
|
かなりどうでもいい話題なんですが、UNIX の部屋の検索で一件もヒットしな かったキーワードを調べてみました。対象は 2001 年。括弧内は検索回数。 なんとなく現在足りない情報がわかって興味深かったです。 今後の参考にさせていただきます。 Solaris or SystemV 系 … 特に管理系がいまいち弱くて申し訳ない。 useradd(541) sar(378) ufsdump(161) pkgadd(146) mailx(145) dbx(95) groupadd(88) usermod(74) ufsrestore(60) usradd(55) nawk(54) userdel(54) pkginfo(54) vfstab(50) sjtoeuc(40) こんなのふつー載ってるだろ系 … なるべく早く書きます ssh(242) expr(172) scp(149) a2ps(108) iconv(95) chroot(57) pushd(52) ulimit(49) slogin(39) rcs(38) bz2(36) Windows の用語をそのまま打ち込んだ系? rename(171) mv のところに「Win で言うところの rename」と書いておけばよい? tracert(36) traceroute のところに「Win で言うところの tracert」と書いておけばよい? tree(46) これは find かなぁ。 68user の弱い方面系 … 申し訳ない。満足な解説書けません。 lpr(328) arp(194) cpio(177) iostat(102) rsync(79) バックアップ(73) lpq(64) プリンタ(58) restore(56) mkfs(55) mknod(54) こんなの検索するんだ… sccs(53) プリント(50) lpstat(43) snmp(39) パーティション(39) これ何? 系 … 誰か教えて。 snoop(161) ipcs(112) fdisk(90) filec(66) ndd(43) showrev(52) ipconfig(53) ioscan(51) mpstat(44) substr(45) perl? 入力が不適切系 … 全角アルファベットはないのですよ。半角に自動置換しようかしら。 ｌｓ(196) ユーザー(166) ユーザならあるんですけど 解凍(150) 展開で統一してます。改善予定 ｆｔｐ(127) ｃｐ(106) ｌｎ(90) ｐｓ(85) ｒｍ(54) リダイレクション(49) その後「リダイレクト」で検索してくれただろうか ｄｆ(48) クーロン(43) これは改善予定 ｍｖ(40) ｃｓｈ(35) その他: select(91) bdf(88) atol(85) ファイル検索(70) logger(68) 需要あるのかなぁ。 pdf(63) ファイル名変更(54) flock(54) htpasswd(53) うーん samba(43) jar(42) なぜ jar が gateway(41) access(36) ちなみに検索にヒットしたキーワードのトップ20はこちら (リンクを たどったものは除く。訪問者が入力したキーワードのみ)。 tar(7512) grep(3832) find(3219) ftp(2502) ls(2490) vi(2370) cp(2215) ps(1799) rm(1773) chmod(1677) gzip(1528) cron(1511) ln(1368) mount(1352) crontab(1330) sed(1257) make(1188) awk(1150) mail(1034) date(1047) |
|
>>2093 68user 『誰か教えて』の意味勘違いしているかもしれませんが…。 > これ何? 系…誰か教えて。 > snoop(161) Solaris 標準コマンド tcpdump のような用途で使う Sniffer ですね。 > filec(66) > ndd(43) Solaris 標準コマンド。主に、TCP/IP 関係のデバイス 制御に使います。たとえば、TCP ヘッダのシーケンス番号 の生成法もこれで変えられたかとおもいます。 FreeBSD の sysctl に似た感じで使います(不正確ですが)。 > showrev(52) Solaris の標準コマンド。pkg 管理用です。 showrev -p なんてすると、どんなパッチが当たっているかが わかります。 > ipconfig(53) これは多分 win のコマンドじゃないかな? ifconfig に似た感じの情報を表示します。 このコマンドを ifconfig みたいにインタフェースの 変更用に使えないんでしょうか? 試したけど、うまくいかなかった。 > mpstat(44) これは Solaris で man mpstat したら出てきましたよ。 |
|
>>2094 rosegarden >> filec(66) おっと、これは消し忘れていました。これは無視してください。 |
|
いつもお世話になっているので、少しでも協力できれば… >>2093 68user > fdisk(90) これって、Linux系だけなのですか？ パーティーションテーブルを操作するコマンドですが… >>2094 rosegarden > ipconfig(53) >変更用に使えないんでしょうか? 表示だけみたいですね。 「Win系はあくまでGUIなんでCUIインターフェースツールは、ホント におまけ」みたいなポリシーのようです。 てか、あまり役に立ってなさそう…とほほ ところで「UNIX の部屋」は、管理者向けの意味合いが大きいのでしょ うか？それとも一般向け？＞68userさん |
|
>>2096 スナフキン > > fdisk(90) > これって、Linux系だけなのですか？ > パーティーションテーブルを操作するコマンドですが… *BSD 系の OS ならあると思います。少なくとも、 FreeBSD/i386, OpenBSD/i386, NetBSD/i386 ならあります。 Solaris も x86 系のならあるかと思います。 今見たところ、SPARC 用の Solaris でも マニュアルはインストールされていますね。 > >>2094 rosegarden > > ipconfig(53) > >変更用に使えないんでしょうか? > 表示だけみたいですね。 そうですか、いや、自分のやり方が悪かったかと、 思っていたのですが、そういう仕様なんですね。 ありがとうございました。 >>2093 68user それから、いま man したら ipcs は Solaris にはあるようですね。 |
|
IPアドレスとホスト名の説明中にある文章に関して >しかしその逆の、FQDN はあるが IP アドレスはない、というマシンは >存在しません。 ネットワークに接続されている全てのマシンには IP >アドレスが付けられています。 FQDNはあってもIPアドレスがないマシンは存在します。UUCP接続の場合 にはネットワークに接続されていないのでIPアドレスを割当てる必要が ないからです。 |
|
>これ何? 系 … 誰か教えて。 > ioscan(51) HP-UXで使いますね。cd-romの装置番号を調べたり、周辺機器の SCSI IDを調べたりするときに使いました。 参考: http://www.calpoly.edu/cgi-bin/man-cgi?ioscan |
|
>>2094 rosegarden > 『誰か教えて』の意味勘違いしているかもしれませんが…。 いえ、そういう意味です。みなさまどうもありがとうございます。 >>2096 スナフキン > ところで「UNIX の部屋」は、管理者向けの意味合いが大きいのでしょ > うか？それとも一般向け？ 両方です。大学などの UNIX ならともかく、PC-UNIX では利用者＝管理者な場 合がほとんどでしょうから、両方の知識を身に付ける必要があると思います。 >>2098 whois > UUCP接続の場合にはネットワークに接続されていないのでIPアドレスを > 割当てる必要がないからです。 なるほど。しかし、 UUCP はメール・ニューズ限定のプロトコルである。UUCP の上には HTTP も POP も載せることができない。つまり、UUCP はトランス ポート層・ネットワーク層に相当し、TCP/IP とは並列関係にある。 http://X68000.startshop.co.jp/~68user/net/net-1.html は、TCP/IP の初歩を解説しているページなので、そこで UUCP に 言及することは混乱を招く。 と思うのですが、いかがでしょうか。UUCP は使ったことも設定したこともな いので、間違っていたら指摘お願いします。 |
|
>>2100 68user >UUCP はメール・ニューズ限定のプロトコルである。 現状はその通りなのですが、名前の通りファイルの転送も出来ます。 以前IIJでAnonymous UUCPでファイルの配布がされていたことが ありました。1分30円だったかな。 「インターネットに接続されている全ての」ではなく、 「TCP/IPでインターネットに接続され…」であればとりあえず 矛盾は無くなりますが、ちょっと分かりにくいですね。 |
|
皆さんはじめまして。実は今はじめてCGIをperlで作っていますが、フォームの内容を送信しようとすると以下のようなメッセージが出てきます。 このメッセージを出すことなくメールへの送信は可能でしょうか？ よろしくお願いします。 Sending C:\WINNT\blt9F.tmp to xxxx@xxx.ne.jp Subject:ＸＸＸＸＸ Login name is info@xxxxx.com |
|
>>2097 rosegarden >そうですか、いや、自分のやり方が悪かったかと、 >思っていたのですが、そういう仕様なんですね。 いえ、仕様だと言い切るとまた語弊がありそうなんで濁しておきます(笑) 自分の場合は、あまりにも使えないコンソールなんで、Cygwin使ってます。 でも、うまく設定が出来ないんでDOSと半々かな(^^; >>2100 68user >両方の知識を身に付ける必要があると思います。 確かにそうですねぇ。自分はGUIは滅多に立ち上げずに殆どCUIのみで 利用していますが、最近の雑誌を見るとGUI上前提の記事が多いので、 実際にWindowsのような使われ方をしている人の比率は多いのかなぁ？ あ、もちろん複数の環境が有る場合ですが… >>2102 よしあき Windows環境でsendmail互換のMTAをperlから利用していると想定して ですが… 多分そのsendmail互換のアプリが出しているメッセージなので、その 部分に以下のような記述をすれば回避できると思います。 (ん？コレはブラットJってやつかな？) 実際の記述部分が判らないので予想で書きますが、 1. open(MAIL, "sendmail 〜 コマンド |"); 2. open(MAIL, "sendmail 〜 コマンド > nul"); 「1」コマンドの標準出力を受け取るので、エラーチェックなどを検知する事もできます。 「2」標準出力を強制的にブラックホールに捨てます。 また、質問する時はもう少し詳しく環境とかを書きましょう。 |
|
初めまして。最近CGIの勉強を始めました。(^^) 今まで、フリーで配布されているCGIの改造をしたことは あったのですが、自分で最初から書けるようになりたいと思っています。 わからないことがあるたびに、本を読んだり、インターネットで検索するのですが 68userさんのページが一番詳しく、わたしの知りたいことが書いてありました。 ありがとうございました。crypt関数とか、半角カナ・機種依存文字問題とか うまくいかなくて、いきづまっていたので、大変参考になりました。 （日本語特有の問題は、翻訳本にはほとんどでてこないし (^^;） これからUNIXのことも勉強したいと思っています。 これからもどうぞよろしくお願いします。 |
|
Perl一般の質問ですみません。 さいきん Word が作った RTF をパースしないといけないハメになったんですが、 VBA はツライので Perl でやろうと思っています。 RTF::Parserというのを見つけてインストールはうまくいったんですが、 ドキュメントがまったくなく、お手上げです。 （TODO: Write a document とか書いてあるのがだいぶ前なので、 投げたのかも、、） どなたか使い方をご存知の方、リンクだけでもご存知の方教えてくださいませんか？ あと、他に Perl で RTF をパースした経験がある方、 「やめたほうがいい」という結論に達した方などなど、 この問題に情報がある方はお寄せください。 また、RTF の規格についてわかりやすく書いているリンクなども、、。 あと、あまりにもこの件が掲示板の趣旨を逸脱するようでしたら すみません、ツッコんでください。(^^; スナフキンさん＞ Cygwin 最高ですよね！ 割り切って使うには最高です。 これと Meadow のおかげでやっと Windows と友達になれました。 ところで、1.1 をお使いですよね？ なぜか B20 ベースの解説サイトやソフトが多いのですが、 B20 にくらべて 1.1 は超超超超安定してていい感じです。 わたしはここでお世話になった技術で Apache をコンパイルして CGI のテストも Windows でしてます！(^o^) |
|
Solaris 2.6 で、Sun Workshop 4.2 を使用しています。 事情により境界整列を全く行なわせない指定をしたいので、 $ cc -flags (snip) >-misalign 境界整列していないデータのロード/ストアを可能にするコードを生成 を指定しているのですが、意図した様な動作が得られません。 また、 >#program align foo, var と指定してもダメです。 どうすれば良いのか御存知の方、いらっしゃいますか? |
|
>>2106 ten >#program align foo, var とりあえず program じゃなくて pragma でしょう。あと、試して ませんが書き方が怪しいのではないかと思います。こちらを参考に。 http://docs.sun.com/htmlcoll/coll.674.1/euc-jp/CUG/accOptions.html#1407 >>2105 ふくし > また、RTF の規格についてわかりやすく書いているリンクなども、、。 Rich Text Format は Microsoft が作った規格なので、Microsoft に 仕様書が存在するはずなのですが、見付けられませんでした。もしかしたら 今は別の団体が管理しているのかもしれません。 |
|
こんちは、お初です。最近Perlはじめました。 ほかの言語はからっきし使えません（TT関西弁ならいけるけど。。。 で、Perlのプログラミングで質問させてもらいます。 テキストファイルで、↓こういうかんじ name age year -------------------------- CCIE 22 2001 みたいな感じのテキストがあって、そこから3行目だけを出力させたいのと この場合だと22だけを取り出したいっていう２つのことがどうすれば いいか今格闘中です。 たぶん正規表現かなーっとおもって オライリーの正規表現見てますがさっぱりで・・・(^^;) どなたか助言よろしくお願いしますm(__)m |
|
>>2108 CCIE > 3行目だけを出力させたい 自分で何行読んだかを数えます。 $line = 1; open(IN, "file"); while (<IN>){ if ( $line == 3 ){ print "これが 3行目の内容です: $_"; } $line++; } > 22だけを取り出したい $_ に "CCIE 22 2001\n" が入っている状態で、 ($name, $age, $year) = split(/\s+/, $_); とすれば $age に '22' が入ります。 \s は空白・タブを表し、\s+ は1文字以上連続した空白・タブを表しますので、 $_ を1文字以上連続した空白・タブで分割し、それぞれのフィールドを $name、$age、$year に代入 という意味になります。 あるいは ($name, $age, $year) =~ m/^(.*)\s+(\d+)\s+(\d+)$/; という方法もあります。^ は行頭、\d は数字、$ は行末を表し、 括弧でくくった部分がそれぞれ $name、$age、$year に代入されます。 |
|
>>2109 68user > ($name, $age, $year) =~ m/^(.*)\s+(\d+)\s+(\d+)$/; 余計なような足りないような… ($name, $age, $year) = m/^(.*)\s+(\d+)\s+(\d+)$/; 若しくは ($name, $age, $year) = $_ =~ m/^(.*)\s+(\d+)\s+(\d+)$/; では無いでしょうか？ |
|
早々の返事ありがとうございますm(__)m 参考に勉強させてもらいます． みなさんすごいですね．ってこういうのでつまづいているのは僕だけかな(TT いまから，↓の＄や()や\や＋がごちゃごちゃしたものをゆっくり理解していきたいとおもいます． 実は今，これでいうと22の部分をTkのGIFgraphで表現しようと思ってるんです． テキストファイルが定期的に書きかえられるのでグラフ化したいと思って． それで，いま撃沈しているところを聞かせていただいたんです． 出きるだけ御迷惑をかけないように自分で努力したいと思いますが，また質問してしまうと思うのでそのときはよろしくお願いします． |
|
はじめまして。68userさんのページはとても勉強になります。時間があったら、全文を熟読したいと思います。（そんな時間ないかもしれませんが。） それにしても、毎回いろいろな人からの質問に応えることのできる知識に、 少し圧倒されました。自分はまだまだ未熟者です。今後どーしてもわからないことがあったら、質問するかもしれませんので、そのときは、どうかよろしくお願いします。 |
|
ふと思ったのですが、CGIへPOSTメソッドでデータを送信した時に そのCGIでデータを受け無い時(readしない場合)って、そのデータは どうなるのでしょう？ CGIで、最近流行りのバッファーオーバーフロー対策？として、POST データサイズを予め調べてから、read で読み込むようにしようと 考えましたが、このような場合は、サーバーOS/ソフト側でバッファ に一旦溜まるのでしょうか？ それとも、CGIが受け取らない限りOS/ソフト側でデータそのものを 受け取らないのでしょうか？ 試しに自環境にあるApacheに、アップロード機能付きの掲示板CGIを 使って約80Mbを送信してみましたが、cgi-lib.pl のエラー？でCGIは 停止したらしく、ps コマンドを見ると、zonbi となっていたため、 httpdがタイムアウト処理？をして切断された結果(だと思う)、ブラウザに 「cgi-lib.pl: Request to receive toomuch data: 84400432 bytes」と 表示され切断されたように見えました。 そして、その状態まで送信は止まらずにブラウザは送信を続けていました。 top や free で送信中のメモリの状態を観察していても変化がなかった 事から、CGIが受け取らないと捨てられてしまうようにも見えますが、 ちゃんと試験が出来ていたのか、自信が無いので正確な所は不明です。 結局、CGIでPOSTデータを受け取らなくても(プロセスが死んでいた為) ブラウザ自身は送信を続けていたので、どの時点で(OSかApache)データ を破棄しているのかは判断できませんでした。 そもそもCGI側でオーバーフローを気にしなくても良いならば、それでいい のですが、どうも動作が判りません。 #それとも実装依存なのかな？ |
|
>>2110 /tk > 余計なような足りないような… 確かに。補足どうもです。 >>2112 moz > 質問するかもしれませんので、そのときは、どうか > よろしくお願いします。 ぜひ回答する側にもまわって下さい :-) >>2113 スナフキン > そのCGIでデータを受け無い時(readしない場合)って、そのデータは > どうなるのでしょう？ 実装依存です。TCP 的に言えば、相手側がプロセスが read してくれないと相 手側の OS のバッファにたまります。それがいっぱいになったら書き込み側が ブロックします。つまり print SOCKET "...."; を実行したままずっと止まってしまうということです。 ちゃんと調べたわけではありませんが、一般的にPOST データを全部受け取っ て CGI に渡す web サーバが 多いような印象を受けます。あくまで印象なの で、試したわけではありません。 もし int sock; bind(...); listen(...); sock = accept(...); ... ヘッダ読み込み ... if ( fork() == 0 ){ char *args[]={"/home/user/public_html/cgi-bin/foo.cgi", NULL}; dup2(sock, 0); execvp("cgi", args); } else { int status; wait(&status); } のように、直接ソケットを CGI プロセスの標準入力に渡すような 実装ならば、CGI プロセスが read しないと書き込み側がブロック するわけですね。 apache の実装がどうなっているかわかったら僕にも教えて下さい。 |
|
>>2114 68user なんかいろいろとアレなので、書き直し。 int sock; int pipes[2]; bind(...); listen(...); sock = accept(...); ... ヘッダ読み込み ... pipe(pipes); if ( fork() == 0 ){ char *args[]={"cgi", NULL}; dup2(sock, 0); dup2(pipes[1], 1); execvp("/home/user/public_html/cgi-bin/foo.cgi", args); } else { char buf[256]; int len; int status; while ( len=read(pipes[0], buf, sizeof(buf) ){ write(sock, buf, len); } wait(&status); } ソケットのデータを CGI プロセスの標準入力に渡し、 CGI プロセスの標準出力を受け取り、そのままブラウザに 返す web サーバもどきです。 |
|
こんにちは。又お邪魔させてもらいました(^^;) この前はありがとうございます。うまくできました＼(^o^)／ 今回は、Perl/Tkなんですがアドバイスよろしくお願いします。m(__)m リストはこんな感じなんですが・・・ use Tk; $mw = MainWindow->new; $mw->title("gifgraph"); $can = $mw->Canvas(-width=400, |
|
すみません↓ tabで形をそろえようとしたら送信のところにいっちゃってenterおしちゃいました(^^;; ヒヤアセ で、リストは use Tk; $mw = MainWindow->new; $mw->title("gifgraph"); $can = $mw->Canvas(-width=>400, -height=>300) -pack(); for(;;){ $gif = $mw->Photo(-format=>'gif', -file=>"graph.gif"); $can->createImage(200,150,-image=>$gif); $mw->after(4000); } 画像が更新されるのでfor文で何度も画像を読みこませたいんですが、ウィジェットすら開かないんです。for文をはずせば今ある画像が表示されるんですが、なぜなんでしょうか？ |
|
>>2117 CCIE Perl/Tk は久しくやってないので忘れてしまいましたが、 $can->createImage(200,150,-image=>$gif); $mw->after(4000, \&change_image); MailLoop; exit; sub change_image { $gif が変わっていたら $can をいじる } じゃないですかね。 |
|
参考にさせていただきました。 少し手を加えてなんとか表示できました。それで、 GDモジュールとGIFgraphモジュールでgifを作って for(;;)｛ ・・・・・・ } の中に入れたんですが $my_graph=new GIFgraph::lines(); ・・・・・ 見たいな感じでGIFgraphを定義させました。 for文の外にこう言う定義は書いたらいいんですが、このモジュールの仕様?(バグ)で中に入れてどんどん作らないと更新されないんで中に書きました。 でもそうすると何度も定義するのでメモリがどんどん食われていくんです。メモリの制御を除いてもメモリが増えていってました。 前に定義したものが残っているのでそれを破棄するってことはできるんでしょうか？ |
|
>>2115 68user そうですか実装依存ですか。それが判っただけでもOKです。 ありがとうございます。 perl側では、あまり意味がないという事になりますかね。 しばらくApache関連の情報も探しましたが、今の所該当する 情報は見つかりません。 わざわざ例題(cですよね？)まで書いてもらいましたが、 よく判りませんでした。m(_ _)m cが解かればソースを見て何とかなるかもしれませんが、 まだ不勉強なので… 何か見つけたら報告します。 >>2105 ふくし ＞ところで、1.1 をお使いですよね？ いえ、B20でした・・・って最近使っていないのがバレバレですが(笑) 自分は、DOS上では面倒な処理をする必要がある場合ぐらいしか 使ってません。普通は本物の環境で作業しています。 Cygwin でシンボリックリンクまで対応している事を知ったのも、 最近です(笑) |
|
すいませんヘルプです。 SUN SPARC ServerUitra5にモデムをつけようとして ttyポートを書き変えたらディスプレイが 見えなくなってしまいました。 モデムから入りエミュレータ−から見るととプロンプトのところに？＜クエスチョンマーク＞がでてこんな事になってます。 ok の後に ls−a をやって見ました。 ls -a f006cd5c SUNW,UltraSPARC-IIi@0,0 f005f2f8 pci@1f,0 f004cd88 virtual-memory f004c7a8 memory@0,10000000 f002ccf0 aliases f002cc80 options f002cb48 openprom f002cadc chosen f002ca6c packages ok ディスプレイを復活させるためには どうすれば良いのでしょうか？ |
|
とっても今さらですが、 >>2119 CCIE > 前に定義したものが残っているのでそれを破棄するってことはできるんでしょうか？ 最小限のスクリプトを見せてもらえればわかるかもしれません (し、わからないかもしれません)。 >>2121 木島 透 すいません、わかりませんです。 ところで、また UNIX の部屋のカウンタが壊れているなぁ。 http://X68000.startshop.co.jp/~68user/cgi-bin/cvsweb.cgi/public_html/count/countup.pl?rev=HEAD&content-type=text/x-cvsweb-markup で怪しそうなところと言えば、 sub counter_increment { ... myopen(OUT,"> $countdir/count.$ARGV[0]") || exit; print OUT "$num\n"; close(OUT); } ここらへんでブラウザが中断されて SIGPIPE 受けた、くらいしか 思い付かない。 ちなみにこのサーバは行儀の悪いロボットのせいか、しょっちゅう file: table is full となります。この前は apache が落ちた形跡があるし。うーむ。 |
|
みなさん、はじめましてこんばんわ。 ＩＰなど、とっても私にとっては難しい事なのですが、今困っていて、ここを探しました。 実はいつも行くＨＰの掲示板などに、荒らしがヒドイんです。 管理人さんは、海外にいるとか、何とかで・・・。管理されていないんですよね。元々は、すごく雰囲気がよくて、みんなが楽しめていた掲示板だったんですが・・・。荒らしが多すぎて、無視して、カキコミしてたら、ほんの数時間前にカキコミしたのが、消えてしまっている・・・その位、ひどいんです。 どうにか出来ないものでしょうか？記事の削除などは、管理人さんしか出来ないですよね？でも、管理人さんが管理をしないので・・・。 困ってしまって・・・。そしたら、ＩＰで、拒否できるっていう情報を聞きました。それも、管理人さんじゃないと出来ない方法なのでしょうか？ 無知すぎる自分も悪いんですが・・・一日も早く、荒らしがいない掲示板に戻ってほしいと思っています。なにか、いい方法があるかたは、教えていただきたいです。 長々と申し訳ありませんでした。 |
|
>>2123 マイ > 記事の削除などは、管理人さんしか出来ないですよね？ そうです。第三者には出来ません。 > ＩＰで、拒否できるっていう情報を聞きました。それも、管理人さん > じゃないと出来ない方法なのでしょうか？ これも管理人が特定の IP アドレスを拒否するようにしないと いけません。 結局のところ、現在の掲示板をそのまま生かすなら、 ・管理人にちゃんと管理してくれ、と頼む ・管理人からパスワードを教えてもらうなどして、管理者の権限を譲り受ける (それを許さないようなプロバイダの規約があるかもしれませんので、ご注意あれ) のどちらかしかないでしょう。 IP アドレスの制限については、掲示板の形態がわからないと 何とも言えませんが、CGI プログラムを使っているのならば http://www2s.biglobe.ne.jp/~cru/library/zddbbs/zddbbs0.html が使えると思います。 |
|
みなさまはじめまして。 場違いな質問かもしれないのですが、 皆様ご親切なので質問させていただきます。 ただいま、当方、ＵＮＩＸＣにて、プログラムを作っております。 そこで、telnetやTeraTermを起動した時に ユーザID、パスワードの認証があると思うのですが、 それと同様のことを、Cのプログラムの中で行ないたいのです。 ＜例＞ ユーザ名を入力してください → USERA パスワードを入力してください → （キーボードを入力しているが出力されない） このような設定（記述）のしかたをご存知の方いらっしゃいますでしょうか？ また、この時に入力されたフィールドをscanfで読み取ることは可能なのでしょうか？ もし、ご存知な方がいらっしゃったら教えていただきたいです。 宜しくお願いいたします。 |
|
>>2125 RUB UNIX と言ってもいろいろあるので、ちゃんと環境を書きましょう。 以下、FreeBSD と仮定して説明しますが、Solaris でも同じはずです。 > パスワードを入力してください → （キーボードを入力しているが > 出力されない） http://www.jp.freebsd.org/cgi/cvsweb.cgi/src/lib/libc/gen/getpass.c?rev=1.9 の getpass が参考になるでしょう。 要は、tcgetattr して、ECHO を落として (NOECHO にする)、 tcsetattr することで、tty ドライバの echo back を OFF にできます。より詳しい情報は termios(4) をどうぞ。 もっとお手軽にやりたいなら、 http://X68000.startshop.co.jp/~68user/net/ftp-5.html の stty の部分を読んでください。 |
|
お世話になります。 土田＠アグレです。 今、ブラウザの変わりになるCOM++のDLL（つまりTCP/IPのブラウザプログラム） を作成しています。 HTTPサーバがWebLogic5.1なのですが、電文そのものはあっているのに、最初から 「HTTP １．１ ４００」のエラーが帰ってきてしまいます。 ソケットのコネクションに問題があるのではと考えているのですが、わかりません。 どなたかお知恵を拝借させていただければ幸いです。 ちなみにコーディングは以下のとおりです。 int AuthSocket::connectAgent(SOCKET sock, long *iPort, long *iRetry, sockaddr *sockAddr) { struct sockaddr_in sockAddrIn; int res, i; memset(&sockAddrIn, 0x00, sizeof(struct sockaddr_in)); sockAddrIn.sin_family=AF_INET; sockAddrIn.sin_addr.s_addr=inet_addr("127.0.0.1"); sockAddrIn.sin_port=htons((unsigned short)*iPort); sockAddr=(struct sockaddr *)&sockAddrIn; res=ECCOM_SUCCESS; for (i=0; i<=*iRetry; i++) { if (SOCKET_ERROR==connect(sock, sockAddr, sizeof(struct sockaddr_in))) { res=ECCOM_FAILURE; } else { res=ECCOM_SUCCESS; break; } } return res; よろしくお願いします。} |
|
>>2127 つちだ > 電文そのものはあっているのに これはどうやって確かめましたか? 具体的に何を送っていますか? 400 Bad Request が返ってくるなら、やはりまずはリクエストを 疑うべきだと思います。 |
|
初めて投稿させていただきます。 突然の質問なのですが、SolarisでGNUを使わずに前日の日付を取得する方法というものはあるのでしょうか？ |
|
>>2129 福助 env TZ=JST-15 date がお手軽でしょうか。 |
|
>>2130 68user 違った。env TZ=JST+15 date でした。 |
|
すいません、HTML で質問です。 charset ですが、 西ヨーロッパ語（ISO-8859-1）と 日本語（Shift_JIS 希望）を一枚の Web ページで共存できるでしょうか？ 以下の方法はいずれもダメでした。 ・font face でフォント名を指定 ・meta タグを２個書く もしご存知でしたらご教示ください、、。 |
|
>>2132 ふくし http://henika.virtualave.net/untitled.htm みたいのでよければ、 http://www.ne.jp/asahi/minazuki/bakera/html/reference/charref (最後にスラッシュはつけない) を参考に、文字実体参照を使用すれば可能かと思います。 それ以外の方法は、unicodeぐらいでしょうか？ |
|
>>2133 Mr. おおっ文字参照、忘れていました。ありがとうございます！ （ちなみに IE6 では見えますが、NC4.75 では見れない、、） 結局 charset は仕様上ページ単位で混在させられない、 ということなんでしょうかねー。 |
|
>> 2133 へにかさん 掲示板のウラをついて敬称をつけようとして失敗しました ;;; すいません。 |
|
教えてくんで申し訳ありません。 会社の FreeBSD に telnet していたのですが、 急に ssh を使えということになり、 愛用の TeraTerm に TTSSH を組み込もうとして苦戦中です。 いろんな Web を参考に、したことは以下の通り。 ・TTSSH のバイナリ−を展開して TTERMPRO ディレクトリに入れた ・空のテキストファイルを作って ssh_known_hosts と名づけて TTERMPRO ディレクトリに入れた ・TTSSH.exe を起動し、とりあえず接続しないで環境設定へ ・[Setup]-[SSH] で [SSH Known Hosts] の [Read/Write Files] に ssh_known_hosts をいれて [OK] ・[Setup]-[Save setup] を実行し、普段使っている teraterm.ini を指定 ・teraterm.ini に [SSH] セクションが加わっており、その中に、 KnownHostsFiles=ssh_known_hosts という行があるのを確認 ・同じセクションの Enabled= をなんとなく 1 に ・再び TTSSH.exe を起動 ・[Host] を正しく指定し、[port] を 22 番にし （ssh のポートが 22 番であることは管理者に確認済み） [Service] を SSH にして [OK] をクリック ・メッセージが出る。 SECURITY WARNING There is no entry for the server "正しいサーバー名" in your list of known hosts. The machine you have contacted may be a hostile machine pretending to be the server. If you choose to add this machine to the known hosts list and continue, then you will not receive this warning again. □ Add this machine and its key to the known hosts list」 ・チェックボックスをチェックして [Continue] をクリック ・メッセージが出て終了。 TTSSH The host and its key cannot be added, because no known-hosts file has been specified. Restart Teraterm and specify a read/write known-hosts file in the TTSSH Setup dialog box. All the encryption algorithms that this program and the server both understand have been disabled. To comunicate with this server, you will have to enable some more ciphers in the TTSSH Setup dialog box when you run Teraterm again. This connection will now close. ・再び TTSSH.exe を起動し、接続せず、[Setup]-[SSH] を見ると、 [Read/Write Files] には何も入っていない。 ・ssh_known_hosts のプロパティは「読み込み専用」にはなっていない。 こういう状況です、、。 |
|
もうしわけありませんでした、状況が変化しました。 Windows 2000 Server と Windows 95 OSR 2.1 を使っているのですが、 下の現象は 2000 でのものでした。 95 を使ったら状況が変化しました。 下の現象（ssh_known_hosts が作られず、つくっても認識しない）は置きませんでした。 たぶん Program Files 配下のフォルダのアクセス権の違いだと思います。 Windows 95 で TSSH.exe で入ろうとすると、 またキーをつくるかと言われたのでチェックしたら、 次回からは聞かれなくなり、 TTERMPRO フォルダの下に ssh_known_hosts が自動的にでき、 その中にホスト名と「公開鍵」が入りました。 それはいいのですが、入ろうとすると、RCA 秘密鍵を指定する方法しか選べません。 FreeBSD に Telnet で入って ssh-keygen で identity を作って それを TTERMPRO フォルダにコピーし、指定したのですが、 Authorization Failed になって入れない状態です。 以上とりあえずのご報告でした。 あせって情報が整理されないままにポストしてしまい申し訳ありませんでした。 |
|
ひとりで騒いでてすみません。 だいぶわかりました。 ・ファイルがあるのに「エントリがない」と怒られ、 「追加してくれ」と言ったらさらに怒られて終了する件は、 ssh ログインと同時に同じ Teraterm をもう１個起動しているときと わかりました。(^^; ・TTERMPRO/ssh_known_hosts は、なくても勝手に作ってくれ、 管理者が定めたリモートホストの公開鍵を自動的に取ってきてくれると わかりました。 ・あとは自分用の公開鍵と秘密鍵のセットを何らかの方法で作り、 秘密鍵を TTERMPRO に入れて [Setup]-[SSH Authorization]-[Use RCA Key to login] で 指定し、 公開鍵をリモートホストの ~/.ssh/authorization_keys という名前で保存すればいい、 らしい。 ・うちのリモートホストは RCA 暗号鍵必須らしい。 （ログインするとき Use plain password.. がグレイアウトするので） ということがわかりました。 が、依然ログインできません。 正しいパスフレーズを入力してるはずなのに Authorization に失敗します。 |
|
書き込みは２回目です。 プログラムというよりはアイデアの問題かも知れませんが，どなたか教えて下さい。 プロバイダのサーバ（UNIX）にPerlで書いたプログラムを送ってCGIを動かしています。よろしくお願いします。 質問１： フレームで区切られたhtmlのページからsubmitボタンでCGIに飛びます。 CGIではprint "Location: $str\n\n";を使って別のhtmlページへ飛ぶようにしています。 この時，そのフレーム部分だけが別のhtmlページへ飛びますが， ウィンドウ全体（親ウィンドウ）を別のhtmlページ |
|
すみません，文が途中で切れてしまったので，再投稿させていただきます。 −−−−− 書き込みは２回目です。 プログラムというよりはアイデアの問題かも知れませんが，どなたか教えて下さい。 プロバイダのサーバ（UNIX）にPerlで書いたプログラムを送ってCGIを動かしています。 質問１： フレームで区切られたhtmlのページからsubmitボタンでCGIに飛びます。 CGIではprint "Location: $str\n\n";を使って別のhtmlページへ飛ぶようにしています。 この時，そのフレーム部分だけが別のhtmlページへ飛びますが， ウィンドウ全体（親ウィンドウ）を別のhtmlページへ飛ぶようにできないものでしょうか。 質問２： FORMから入力された文章中の半角カタカナを全角カタカナに変換したいのですが 半角カタカナを（文字化けしないで）半角カタカナとして CGIで受け取る方法はあるでしょうか。 FORMから入力された文章をEUCでconvertする前に文字化けしてしまうので（？）， jcodeのh2z_eucを使っても上手くいきません。 |
|
あ，UNIXにもいろいろあるのですね。 ソフトはFreeBSDです。 |
|
>>2138 ふくし うーん、TTSSH は使うこともありますが、いつも plain password で やってるのでわかりませんです。すいません。 >>2140 椎 > ウィンドウ全体（親ウィンドウ）を別のhtmlページへ飛ぶように > できないものでしょうか。 多分 Location ではどうにもならないと思うので、CGI で Content-type: text/html <html><body onload="document.myform.submit()"> <form name=myform action="hoge" target="fuga" method="get"> </form> </body></html> てな HTML を吐くのはどうでしょうか (最近ちょっと Javscript を 覚えた)。 > 半角カタカナを（文字化けしないで）半角カタカナとして > CGIで受け取る方法はあるでしょうか。 普通、何もしなければ文字化けはしません。perl は扱っている データが半角カナかどうかを意識しませんので。 具体的にどういう処理を行って、どううまくいかないのですか? |
|
＞68user さん いつもお世話になっております！ 結局、 ・TTSSH は RSA 暗号鍵しかサポートしていず、 一方うちの FreeBSD は DSA 暗号鍵しかサポートしない （%ssh -V の結果は OpenSSH_2.5.2p2, SSH protocols 1.5/2.0, OpenSSL 0x...） ということらしいです？？？ よくわかりませんが、、。 ということで、 ・DSA をサポートする Windows SSH クライアントで、 ぼくがしたいこと（Emacs を使って Perl をいじったり Mew でメールを読んだりする）ができるものを探す ・Cygwin を使う（と、出来るらしい） ・DSA をサポートする Windows SSH クライアントで接続し、 別マシンの Telnet ポートをポートフォーワーディングして Telnet で使う ・会社のマシンを RSA にしてもらう などの認識でいいのか、検討中です。 ところで、本掲示板の趣旨は理解しているのですが、 ちょっと事情があってあせっています。 （来週にも Telnet 禁止になるらしい、、、） ココ以上の掲示板が見つかるかわからないのですが、 場合によっては同趣旨の質問を別の場所に マルチポストしていいでしょうか？ ずうずうしいですが非常時ということでご検討お願いします、、。 |
|
先日はありがとうございました 今回もまた質問で恐縮なのですが、cshのシェル変数のstatusのようなものはbshにはないのでしょうか？スクリプトを作る際、２種類のファイルを比較しそのファイルに違いがあればエラー処理ということを実行したいのですが・・・。何卒よろしくお願いいたします |
|
＞ ふくしさん ~/.ssh/authorization_keysではなくて、~/.ssh/authorized_keysということではないですか？ openssh_2.3から2.9にして使ってますがどちらもRSAが使えないということはありませんでした。 もしくはビルドする際のオプションが違うとか。 |
|
>>2143 ふくし > （来週にも Telnet 禁止になるらしい、、、） おすすめしているわけではありませんが、ssh の plain password で 運用するのはダメですか? > 場合によっては同趣旨の質問を別の場所にマルチポストしていいでしょうか？ どうぞ。結論が出たら教えて下さい。 >>2144 福助 > 先日はありがとうございました 上の「使い方」を読んでください。で、結果を報告するようにして下さい。 もしそれが面倒でしたら、申し訳ありませんが掲示板の使用はご遠慮下さい。 > cshのシェル変数のstatusのようなものはbshにはないのでしょうか？ $? です。 |
|
68userさん＞ （plain password の件） TTSSH の初期画面で、plain password の部分が （というか、RSA 鍵の使用以外の部分が） すべてグレーで使用不可になっているんです。 たぶん接続先の ssh の設定だと思います。 （マルチポストの件） ありがとうございます。 でもその必要なくなりました。 にゃさん＞ すいませんその通りだったようです、、、;;;;;; ということで開通しました！ わーんこれで来週も生きられる、、 （Teraterm/Emacs/Mew 依存症なだけなんだけど、、） |
|
>>2142 68user 御返事ありがとうございました。 Javascriptはよくわからないので，まずはそのままprintでCGIに入れてみましたが Internal Server Error……と言われてしまいました。 どの部分かは書き換える必要があるのでしょうか。 ジャンプ先のURLはどこに入るのでしょうか。 Javascriptに解決方法がありそうということであれば， そちらを勉強してみてそれから再度報告しますが， 今回の件を解決する上で勉強上のポイントがあれば教えてください。 お願いばかりですみません。 > 具体的にどういう処理を行って、どううまくいかないのですか? ウェブページ上のフォームに半角カナで入力してsubmitボタンで送り， 受け取ったCGIで，「=」で$key,$valにsplitした後に%inに入れて while (($key,$val) = each %in) { jcode::convert(\$key, 'euc'); jcode::convert(\$val, 'euc'); if ($val eq 'http://') { $val = ''; } $val =~ s/\r\n|\r|\n//g; $val =~ s/,/，/g; $in{$key} = $val; } なんてことをやっています（途中の置換は今回の件とは関係ないと思いますが……）。 この後，CGI上でhtmlを書き出して$valをウェブページに表示させると文字化けします。 例えば，半角カナで「アイウエオ」と入れると「竺軸宍雫七」となりました。 |
|
＞ ふくしさん よかったですね。 protocol versionsを2だけに制限されるところもあると思うので気になってました。 公開鍵暗号の認証の方がssh-agentを使えるので慣れば楽だと思います。 TTSSHだと関係ないですがCygwinからなら使えますし。 あと、何か変なことがあったら、 ssh -v で挙動を調べると原因がわかることが多いです。 ＞ Teraterm/Emacs/Mew 依存症なだけなんだけど、 OSを変えてしまった方が楽の様な気が・・。 |
|
>>2122 68user > ところで、また UNIX の部屋のカウンタが壊れているなぁ。 ご存知だったらすみません。 受け売りですが，カウンタ記録ファイルを２つ用意するといいみたいです。 単純な方法ですが，効果抜群とか……。 自分はそんなにアクセスが集中するページを持っていないので， 効果の確認はできていませんが……。 ↓自分がデータベース用に使っているPerlのスクリプトです。 @file1 = stat($logfile1); @file2 = stat($logfile2); if ((@file1[9]) > (@file2[9])) { $rfile = $logfile1; $wfile = $logfile2; } else{ $wfile = $logfile1; $rfile = $logfile2; } &lockwait; #←ファイルロック用のサブルーチンです。 if (!open(DB,"$rfile")) { &error('データベース読取エラー','復旧をお待ちください。'); } @lines = <DB>; close(DB); rmdir($lockfile); |
|
>>2148 椎 > そのままprintでCGIに入れてみましたが Internal > Server Error……と言われてしまいました。 Javascript はブラウザ側で解釈するものなので、Internal Server Error が起きたということは CGI 側の問題です。perl -c などで 文法チェックをしてみて下さい。おそらくは print "<html><body onload="document.myform.submit()">\n"; などと、" の中に " をそのまま書いたか、Content-type ヘッダの 先頭に空白を入れたか、というところではないでしょうか。 > ジャンプ先のURLはどこに入るのでしょうか。 form の action です。 > 「竺軸宍雫七」 それは perl や jcode.pl 的には化けていません。EUC-JP の半角カナの 「アイウエオ」は 8e b1 8e b2 8e b3 8e b4 8e b5 です。一方、Shift_JIS の「竺軸宍雫七」は 8e b1 8e b2 8e b3 8e b4 8e b5 です。つまり全く同じコードであって、同じバイト列を EUC-JP と解釈するか、 Shift_JIS と解釈するかで表示が違う、ということになります。 で、エンコーディングを解釈するのはブラウザの仕事なので、 ブラウザが誤認しないように print "Content-type: text/html; charset=EUC-JP\n\n"; と適切なエンコーディングを指定してやればよいです。 > jcodeのh2z_eucを使っても上手くいきません。 この件は具体的に書いたスクリプトを提示して下さい。 >>2150 椎 > カウンタ記録ファイルを２つ用意するといいみたいです。 なるほど。ただその手法は壊れる確率は低いけど正確なカウントは できないように見えるので、ある意味「逃げ」かなぁとは思います。 完璧な排他ができないはずはないと思っていますので。 このページは自己満足のためにあるのでその手法は選びませんが、 仕事となればそういう解もありだとは思いますので、全面的に 否定しているわけではありません。 |
|
>>2140 椎 > フレームで区切られたhtmlのページからsubmitボタンでCGIに飛びます。 であれば, submit が含まれている form の target に "_top" を 指定すれば良いだけに思えますが・・・ > EUCでconvertする前に文字化けしてしまうので（？） というのは, どのように確認されましたか？ >>2150 椎 > if ((@file1[9]) > (@file2[9])) { スライス？ |
|
>>2152 /tk ありゃ？ 3点リーダって駄目なのか。 すいません。以後気をつけます。 |
|
連続ですいません。 >>2153 /tk 単にウチのIMEが3点リーダでは無く 半角中黒3つに変換していただけでした。 |
|
>>2061-2071 なぜ HELO や EHLO を送るのかという話ですが、http://www.sk-jp.com/book/javamail/ の本には helo は、Sender MTA んもホスト名を記述することになっている。 しかし、現在はここに何を書いても意味をなさないようになって いる。なぜなら、現在ではクライアントがグローバルなホスト名を 持たないことが多いので、記述すべき内容がない & 正しいかどうかを 検証する手段もない。 というようなことが書いてあります。なので、歴史的な事情、というのが一点。 さらに http://djbdns.jp.qmail.org/djb/smtp.html にあるように、EHLO のレスポンスにより、その SMTP サーバで使用可能な コマンドがわかるので、MUA はこれを読んで適切なコマンドを送るように すべき、というのが一点。 …でどうでしょうか? (そんなことはわかっておられるような気が とてもしますが) ちなみにこの本、JavaMail (Java 用 POP・SMTP・IMAP の API) を 使う人なら文句なくおすすめです。 >>2140 椎 > であれば, submit が含まれている form の target に "_top" を > 指定すれば良いだけに思えますが・・・ ああ、なるほど。ごもっともです。 |
|
始めまして。 Ｃ言語のネットワークプログラミング参考にさせて頂いて おります。m(_ _)m 一つ質問なんですが、httpsのサイトを取得する時、 プロキシー経由の場合はどのようになるのでしょうか？ google等で検索してみたのですが、分かりませんでした。 最初にプロキシーに対して、 CONNECT **.com:443 HTTP/1.0 HOST: **.com って感じでやるのかなぁって所まで分かったのですが、、 ご存知の方いらっしゃいましたら、ヒントだけでも頂きたい です。宜しくお願い致します。 |
|
長文ですみません……。 >>2115 68user > " の中に " をそのまま書いた その通りです。うっかりしてました。 > form の action です。 htmlと同じなのですね。 strはよく見るのですが，hogeとかfugaは知らなかったので……。 よければ意味を教えて下さい。 > つまり全く同じコードであって、同じバイト列を EUC-JP と解釈するか、 > Shift_JIS と解釈するかで表示が違う、ということになります。 なるほど。 > print "Content-type: text/html; charset=EUC-JP\n\n"; > と適切なエンコーディングを指定してやればよいです。 やってみましたが，同じ結果でした。うーん……悩む……。 ちなみにこうする前は， Content-type: text/html\n\n と <META HTTP-EQUIV="Content-Type" CONTENT="text/html;CHARSET=x-euc-jp"> を入れていました。 > > jcodeのh2z_eucを使っても上手くいきません。 > この件は具体的に書いたスクリプトを提示して下さい。 require 'jcode.pl'; jcode::convert(\$str, 'euc'); jcode::h2z_euc(\$str); です。 > なるほど。ただその手法は壊れる確率は低いけど正確なカウントは > できないように見えるので、ある意味「逃げ」かなぁとは思います。 > 完璧な排他ができないはずはないと思っていますので。 そうですね。 私は「累計」を正確にカウントすることに意味があるのか疑問なので （カウンタは目安だと思っているので）気にしていないのですが， プログラム的にはつきつめる価値はあると思います。 >> 2152 > であれば, submit が含まれている form の target に "_top" を > 指定すれば良いだけに思えますが・・・ formにtargetが使えることを知りませんでした。 やってみたら上手くいきました。ありがとうございました。 > > EUCでconvertする前に文字化けしてしまうので（？） > というのは, どのように確認されましたか？ いえ，確認できていないので（？）を付けています。 ただ，convertした後に半角カナを拾い出すスクリプトを入れていて， 文字化けした後の文に含まれている半角カナは拾うことができているので， なんとなくそうなのかな……と思いました（根拠になっていませんね）。 例）半角カナで「明アイウエオ」とすると「フタ竺軸宍雫七」（フタ：半角カナ）に 文字化けし，「フタ」を拾い出すことができています。 > スライス？ すみませんが，意味がわかりませんでした。 ちなみに，このやり方は本屋で買った書籍から知りました。 |
|
>>2157 椎 > hogeとかfugaは知らなかったので……。 hoge の意味ですか? ならこちらを。 http://www.selab.tutkie.tut.ac.jp/~yoshida/hoge.html > require 'jcode.pl'; > jcode::convert(\$str, 'euc'); > jcode::h2z_euc(\$str); それで正しいと思います。 それでも化けるなら、文字列処理をしている全ての処理 - ブラウザから渡された「%8e%b1%8e%b2」というような URL エンコード された文字列 - & で split した文字列 - = で split した文字列 - URL デコードした文字列 - EUC に変換した文字列 で、print 文でデータを出力してみて下さい。そしたらどこで化けて いるかわかるでしょう。また、フォームが書いてある HTML の文字 コードが何になっているかも調べて下さい。 わからなかったら、最小限まで切り詰めたソースを見せて下さい。 >>> if ((@file1[9]) > (@file2[9])) { >> スライス？ > すみませんが，意味がわかりませんでした。 $file1[9] が正しい、ってことでしょう。 > ちなみに，このやり方は本屋で買った書籍から知りました。 $file1[9] や (@file1)[9] なら正しいですが (わざわざ後者の書き方を する必要はありませんが)、@file1[9] は誤りです。本当にそう書いてあるなら その本は捨てましょう。 >>2156 Nira > CONNECT **.com:443 HTTP/1.0 > HOST: **.com ここまでは正しいと思います。その後は暗号化したリクエストを 送りますが…暗号化まで自力でやろうとしておられます? |
|
>>2158 68user ご返答ありがとう御座います。 >ここまでは正しいと思います。その後は暗号化したリクエストを >送りますが…暗号化まで自力でやろうとしておられます? CONNECTメソッドまでは正しいですか。 暗号化を自分でやるだけの知識は無いです。（--;） CONNECTした後は、サンプル通りのにやっているのですが、 SSL_connect()で0が返ってきます。 方法が正しいなら他の部分のバグかもしれないっすね。 そういえば、httpsの取得に良いサイトを発見しました。 https://www2.ggn.net/cgi-bin/ssl です。http://www.moxienet.com/lynx/ssl-testから リダイレクトされるサイトで、LynxでSSLが使用できる かどうかをチェックするためのサイトらしいです。 |
|
>>2158 68user ありがとう御座いました。 理由はわからないのですが動くようになりました。 SSL_load_error_strings(); の後に ERR_load_crypto_strings(); ERR_load_SSL_strings(); OpenSSL_add_all_algorithms(); を追加してみたら、難なく動きました。（--;） http://www.openssl.org/docs/crypto/BIO_f_ssl.html のサンプルを見てたら、上記３つの関数を呼んでいたので 真似してみました。 お騒がせ致しました。m(_ _)m |
|
はじめまして 最近CGIを作りはじめたして、問題が・・・ サーバはUNIXでCGIの処理を行なった後に作られたファイルの所有権がすべてnobodyになってしまっていて、その作られたファイルの操作が全くできなくなってしまいました。所有権の変更も出来ないんです。 だれか助けて下さい。。 おねがいします。 |
|
>>2159 Nira > そういえば、httpsの取得に良いサイトを発見しました。 ありがとうございます。このページをサンプルとして載せておきます。 >>2161 あやの > その作られたファイルの操作が全くできなくなってしまいました。 #!/usr/bin/perl system("rm -f ファイル"); print "Content-type: text/plain\n\n"; print "File removed.\n"; というような CGI スクリプトを作って、ブラウザから CGI に アクセスすれば消せます。 > 所有権の変更も出来ないんです。 普通ファイルの所有者を変更できるのは root のみです。 # 設定次第でできる OS もありますが。 よって、 - 事前にファイルを作成しておき、nobody が中身を変更できる ようにパーミッションを設定する。 - ファイルの所有者は nobody とし、他のユーザがそれを 参照・変更できるようにパーミッションを設定する。 - ファイルの所有者を nobody 以外とする。 サーバ管理者に suExec や cgiwrap を入れてもらうか、 自分で suid なプログラムを作る。 # http://x68000.startshop.co.jp/~68user/webcgi/permission.html のいずれを選ぶ、ということになります。 |
|
はじめまして、こんばんはっす。 突然ですがシェルスクリプトをつかってファイルを 書き換えようとしてるのですが "ディレクトリースタックの番号指定が深過ぎます." とコメントされ動いてくれません。どういうことなんでしょうか? ちなみに このシェルスクリプトです。 わかるかたがいたら教えて下さい。 #!/bin/tcsh set d=1 while(d<=16){ cat -n invar3_$d.dat > ninvar3_$d.dat d++} end |
|
>>2163 けんじ 突っ込みどころがたくさんありすぎて書ききれないので、とりあえず 動くものを置いておきます。 #!/bin/tcsh set d=1 while ( $d < 16 ) cat -n invar3_$d.dat > ninvar3_$d.dat @ d = $d + 1 end まずはマニュアルか、初心者向けの csh プログラミングの本を 読んで下さい。よい本が見付からなければ sh で書くのも手です。 sh なら結構な種類の本が出ています。 |
|
すいません、丁寧に教えていただき ありがとうございます。 はい、もっともっと勉強していきます! ただ、perlやshではうまくいってくれるのですが なぜかcshでは教えてくださったようにしても "ディレクトリースタックの番号指定が深過ぎます." といって動いてくれません。 特になにも変更等していないのですが、、、、。 なにはともあれありがとうございました! |
|
とても長いCGI処理がしたくてforkで子プロセスに処理を投げてあげたときは、ブラウザがすぐ開放されることは分かったんです。でも、処理中にエラーとか発生したときは見た目で分からなくなっちゃうんですよね？？ エラーのときはなんか表示させたいのですが良い方法はあるのでしょうか？ それとも長い処理はもっとfork以外の違う方法があるんですかね？？ よろしくおねがいします。。。 |
|
>>2165 けんじ > ただ、perlやshではうまくいってくれるのですが perl と sh と csh は全く別物ですけど、それは理解されてますか? > 特になにも変更等していないのですが、、、、。 という文章は、sh で動いたものをそのまま csh でも動かそうと しているように見受けられます。 > "ディレクトリースタックの番号指定が深過ぎます." $d<=16 を d<=16 と書けばそうなります。 >>2166 かな 掲示板の一番上にある「使い方」を全く読んでいませんね。 # http://www.parkcity.ne.jp/~chaichan/qanda/qa1999.htm?01-10-03-19-11 |
|
>>2158 68user > print 文でデータを出力してみて下さい。そしたらどこで化けて > いるかわかるでしょう。また、フォームが書いてある HTML の文字 > コードが何になっているかも調べて下さい。 やってみたら，どこで化けているかわかりました。 jcode::convert(\$str, 'euc'); で化けていて，これを削除したら化けなくなりました。 なぜでしょうか？ フォームが書いてあるHTMLの文字コードはeucにしています。 その場合は，コンバートする必要がないということでしょうか？ とりあえず解決したみたいなのですが（？）， 気になるのでぜひ教えて下さい。 > $file1[9] が正しい、ってことでしょう。 あ，確かに。 本からそのまま写して問題なく動いていたので 全然気付きませんでした。 人に見せると恥ずかしいので，早速，修正しました。 ありがとうございました。 > その本は捨てましょう。 あはは(^^; 確かに，少なくとも私のような初心者は 正しい記述の本で勉強した方がいいでしょうね。 私でも気付くような間違いがあちこちにあることは確かです。 でも，プログラミングのアイデアというかミソというか 参考になる点もたくさんあって，結構重宝してます。 |
|
とても初歩的な質問だと思いますが、教えて下されば幸いです。 掲示板を最近設置したのですが、サーバがアメリカにあるため 時差があるタイムスタンプをします。この時間を 16 時間早めたいのですが どのような記述をすればいいのか、わからないのです。恐らく下記の一行が関係するのだと思います。 $TimeDiff = 0; よろしくお願いいたします。また、過去ログを一応見ましたが既出の質問であった場合はお詫び申し上げます。 |
|
>>2168 椎 > なぜでしょうか？ なぜでしょうね? 正確なところは各部分で s/([^-_a-zA-Z0-9])/sprintf("%%%02lX",unpack("C",$1))/eg; として URL エンコードした結果を見ないとわかりません。 > フォームが書いてあるHTMLの文字コードはeucにしています。 > その場合は，コンバートする必要がないということでしょうか？ NN4, NN6, IE4, IE5 あたりなら、フォームの書いてある HTML と 同じエンコーディングで、フォームデータを送ってきますので、 フォームの書いてある HTML と、処理するデータのエンコーディングが 一致しているなら jcode::convert は必要ありません。 ただし、これは規格として明文化されているわけではないので、 あくまでも NN と IE がそういう挙動をする、ということです。 もし Shift_JIS や ISO-2022-JP で送ってくるブラウザがいた 場合は化けます。 >>2169 ジュン > この時間を 16 時間早めたいのですが 言語は何ですか? 以下は perl だと仮定して…。 $TimeDiff をどのように利用しているのかわからないと なんとも言えませんが、秒数なら $TimeDiff = 60*60*16、 時間なら $TimeDiff = 16 でしょうか。 localtime を使っているなら、その前の行に $ENV{TZ}='JST-9'; と 書いておけばうまくいくかもしれません。 |
|
> その本は捨てましょう。 う〜ん、ここは68userのボードなので構わないのですが、 なんか、2ch化しているようでちょぴりショックだなぁ(^^ゞ 多分typeでしょう、本当にその様に書くことを勧めているのであれば 68userさんと同じ意見ですが… だけど、椎さんがコマンドの本来の項を読まずに、理解しようとしないで コピーしているだけであれば、椎さんの手抜きでしょうけど(^^ゞ まあ、自分もはじめはそうだったので人の事を言えませんが(笑) ちなみに、テストの為にコンバートした短い文字列を表示していませ んか？昔のネスケでの挙動ですが、短い文字列の場合はブラウザで文字 コードの判別がつかずに化ける場合があります。 その場合はそこそこの長文を表示すると、うそのように表示される場合 が有りました。 原因はSJISとEUCの文字コードが一部かぶる為です。(自分のスクリプ トはSJISで記述の為) あと、よくやるのがEUCでコンバートして出力していながら、CGIの他の 表示部分で違うコードを出力していたり(結構気付かなかったりします) プログラマーな人は、この様な無駄なトラブルを減らす為にALL EUCで 作る人が多いようですね。 >プログラミングのアイデアというかミソというか 自分の場合は、他人のスクリプトを解析することでいろいろ覚えました。 リファレンス以外はこの手法が一番お勧めです。 無駄を省いたルーチンは誰が作っても大体同じようなものになるはずです。 この掲示板のソースだってかなり勉強になるはずですよ(^^ゞ >>2166 かな 「使い方」を読むどころか、コピー文章ですね(^^ゞ ここまで典型的なのもはじめて見ました(笑) ところで、最近JAVAに嵌まっているようですが、JAVAはJavaScriptと perlとどちらに近い印象でしょうか？＞68userさん 敬遠していたJAVAも覚えた方がいいかなぁ、と思う今日この頃(^^ゞ |
|
>>2168 椎 > jcode::convert(\$str, 'euc'); > で化けていて，これを削除したら化けなくなりました。 > なぜでしょうか？ とりあえず, getcode 関数の戻り値を確認してみましょう。 http://www.mikeneko.ne.jp/~lab/kcode/jcode.html#h2-1 http://www.din.or.jp/~ohzaki/perl.htm#JP_Code >>2157 椎 >> スライス？ > すみませんが，意味がわかりませんでした。 ありゃ。すみません。 >>2158 68user > $file1[9] が正しい、ってことでしょう。 という意味でしたが, 断言する自信が無いのと もし, 意図的にやっている事ででしたら その理由が聞きたかったもので… ちなみにスライスについては http://www.context.co.jp/perlnews/bn/perl-newsletter-0010.html http://www.context.co.jp/perlnews/bn/perl-newsletter-0013.html が参考になると思います。 |
|
>68userさん 素早い回答と、明確のお答えありがとうございます。 使っている言語はperlで、秒数の設定により解決しました。ありがとうございました。 |
|
>>2170 68user > 一致しているなら jcode::convert は必要ありません。 必要ないということは，あってもいいのでしょうか。 つまりeucをeucにコンバートする処理をしても問題はないんですよね？ そうだとしたら，今回の問題はまだ解決できていないということですね。 >>2171 スナフキン > コピーしているだけであれば、椎さんの手抜きでしょうけど(^^ゞ ええ，その通りです。まだわからないことが多いので，とりあえず(^^; > そこそこの長文を表示すると、うそのように表示される場合 > が有りました。 そうかもしれません。ただ，短い文字列を入力するようにしていますので， 根本的に解決しないとダメですね。 > CGIの他の表示部分で違うコードを出力していたり イメージできないんですが，具体的にどんな場合でしょうか。 エディタでeucで保存するようにしているのですが， これだけではeucにならないものでしょうか。 > この掲示板のソースだってかなり勉強になるはずですよ(^^ゞ 機種依存文字の検出のところなど，参考にしたいなと思っていました。 とはいえ，今日初めてソースを見たのですが， 理解するのに，かなり時間がかかりそうです。 >>2172 /tk > とりあえず, getcode 関数の戻り値を確認してみましょう。 おお，これは使えそうですね。やってみます。 > ちなみにスライスについては なるほど〜。よくわかりました。 必要がないのにスライスを使っていたことになるわけですね。 意図的でなくて申し訳ない感じです。 |
|
こんにちは、はじめましてTOMです。 初級アマチュアプログラマーです。 ちょっと自分で解決できなかったので質問を聞いてください。 ・モジュールＡに、ライブラリlib30.soをリンクしています。 ・モジュールＢに、ライブラリlib40.soをリンクしています。 ・さらに、ライブラリlib40.soの中で、ライブラリlib30.soの中の関数Func09が 使用されています。 ライブラリlib30.soの中の関数Func09が修正されました。 再コンパイル、再リンクは、 全て（モジュールＡ・モジュールＢ・lib30.so・lib40.so） 行わなければならないのでしょうか？ よろしくおねがいします。 |
|
>>2175 TOM Func09 の引数の数や、引数の型、戻り値の型を変更しましたか? また、Func09 から他の部分のグローバル変数を参照するところ を変更しましたか? いずれの変更もしてないなら、ライブラリ利用側の再コンパイル・ 再リンクは不要です。 引数や戻り値を変えた (＝インタフェースを変えた) なら、 再コンパイル・再リンクのし忘れを防ぐため、メジャー番号を lib30.so.1 -> lib30.so.2 などと上げた方がよいでしょう。 >2174 >> 一致しているなら jcode::convert は必要ありません。 > 必要ないということは，あってもいいのでしょうか。 あってもよいです。僕は必ず jcode::convert は付けます。 > つまりeucをeucにコンバートする処理をしても問題はないんですよね？ 本来問題ないのですが、Shift_JIS の半角カナと EUC-JP を正確に 判別することはできないので、EUC-JP な半角カナを Shift_JIS の 文字列だと誤認してしまい、EUC-JP に変換しようとする、ということは あります。 一応 jcode.pl がエンコーディングを自動判別する際は、「Shift_JIS と して解釈できる部分の長さ」と「EUC-JP として解釈できる部分の長さ」を 比較して長さが長い方を採用しますが、もちろんこれでも完璧では ありません。 # たしか両方の長さが一致したら、EUC-JP とみなされたと思う。 > 必要がないのにスライスを使っていたことになるわけですね。 いいえ、@a[0] はスライスを使っているわけではありません (よね?)。 perl がおせっかいなので @a[0] -> $a[0] という読み替えをしている だけです。 % perl -we '@a=(100,200);print "@a[0]\n"' Scalar value @a[0] better written as $a[0] at -e line 1. 100 >>2171 スナフキン > ところで、最近JAVAに嵌まっているようですが、JAVAはJavaScriptと > perlとどちらに近い印象でしょうか？＞68userさん うーん、どっちも遠いですねぇ…。でもまぁ僕がやってるのは サーバサイドの方なので、どちらかと言えば perl ですか。 でも、perl とは似てないですね。 とにかくクラス設計が楽しいです。 |
|
すいませんでした。 以後気を付けます。。 |
|
はじめまして。 ネットワーク関係の関数でちょっと質問なのですが。 inet_aton(hostname)になっていますがこれをinet_aton (ipaddres) にしても問題はないのでしょうか？ hostnameが解決されていない場合、IPアドレスをそのまま 使用してみたのですが表面上問題はでていませんが、 内部的にどうかまで分からなかったので。 どなたか教えて下さい。 分かり難い内容の書き込みになってすみません。 |
|
>>2176 68user > # たしか両方の長さが一致したら、EUC-JP とみなされたと思う。 一致した場合は undef では？ > いいえ、@a[0] はスライスを使っているわけではありません (よね?)。 > perl がおせっかいなので @a[0] -> $a[0] という読み替えをしている > だけです。 http://www.ascii.co.jp/books/detail/4-7561/4-7561-3057-7.html を読んだうえでの僕の解釈は @a[0] はスライスです。 但し, 要素数が 1 のリストであり, スカラー値ではありません。 たまたま @a[0] をスカラーで評価したときに, その最後の要素である $a[0] が返されただけです。 となるのですが 例によって勘違いしている可能性大です。 |
|
>>217668user 68userさん インターフェイスの変更は、ありませんので ライブラリ利用側を再コンパイル・再リンクせずに利用できました。 回答ありがとうございました。 |
|
/tkさんが教えてくれた↓のページを読むと， > http://www.mikeneko.ne.jp/~lab/kcode/jcode.html#h2-1 ・convert()は内部ではgetcode()を自動的に呼び出し文字コードを判断する ・getcode()では，半角カナは文字コードの自動認識の判断対象からはずされる とあります。また，スナフキンさんが > そこそこの長文を表示すると、うそのように表示される場合が有りました。 と言われたように，私の場合も半角カナ以外の文字をある程度以上追加すると 文字化けしないことがあります。 例）アイウエオ（半角） →竺軸宍雫七（全角） アイウエオ（半角）あいうえお（全角）→アイウエオ（半角）あいうえお（全角） これらのことから，今回の文字化け現象の原因は，convert()が （正確にはgetcode()が）半角カナの文字コードを 正確に判別できていないことのようです。 これを調べるためにコンバートの前後でgetcode()をかけてみました。 $code1 = &jcode::getcode(\$str); jcode::convert(\$str, 'euc'); $code2 = &jcode::getcode(\$str); その結果，次のようになりました。 $str = 'あいうえお' → $code1 = 'euc'，$code2 = 'euc' $str = 'アイウエオ（半角）' → $code1 = 'sjis'，$code2 = 'euc' つまり，getcode()は半角カナの「アイウエオ」をsjisと判定して sjisをeucに変換する処理をしていたのです。 長々と書きましたが，68userさんが書かれたように， > Shift_JIS の半角カナと EUC-JP を正確に > 判別することはできないので、EUC-JP な半角カナを Shift_JIS の > 文字列だと誤認してしまい、EUC-JP に変換しようとする、ということは > あります。 ということのようです。 で，ここでどうするかというプログラム上のアイデアが問われるのですが， （残念ながら例の本には載っていません・笑） 今は，「$strに全角文字を数個追加して，コンバート後にそれを除く」ということを 考えています。 ただ，自分でもかっこ悪いなぁと思うので，他にアイデアがあれば教えて下さい。 >>2176 68user > いいえ、@a[0] はスライスを使っているわけではありません (よね?)。 私は/tkさんが教えてくれたページを読んでスライスを覚えたので No.2179の/tkさんと同じ解釈をしたのですが， この解釈の違いによって，使い方とその結果が変わるということが ないのであれば，あまり本質的な問題ではないような気がします。 68userさんが正しい知識を教えようとしてくれる気持ちはとてもありがたいです。 |
|
シイ |