zebedeer の回答履歴

2人以上の方が同時にファイルの書き込みをすると ログファイルが白紙になったりエラーが起こってしまうらしく、それを防ぐために以下のような書式が open(OUT, "> file.txt"); flock(OUT, 2); print OUT ".......\n"; close(OUT); # closeすると自動的にアンロックされる とほほのWWW入門で記載されていたんですが、このロック方法で本当に大丈夫なのでしょうか とほほさんの解説があまりにも漠然としていて信じがたいんです。 詳しい方、上の方法でも十分かどうかご教授よろしくお願いします。 http://www.tohoho-web.com/wwwperl3.htm#Lock

現在flashの勉強を始めた者です。 flashを使ってゲームを作りたいと思っています。 オンラインの対戦ゲーム（１：１のもの）を作りたいのですが、 サーバー側はどのようにしたら良いのかよく分からないので ご教授頂ければと思います。 サーバー側は出来ればperlでサーバープログラムが出来ればいいなと思っていますが、perlでも可能でしょうか？ 今までperlでファイルを読み取り計算したり正規表現を使ってりすることは出来ます。 しかし、ネットワーク上でデータを直接やりとりすることをしたことがありません。 質問をまとめますと Perlでサーバー側のプログラムを作ることは可能でしょうか？（C++でなくても大丈夫か） また、開発する上でのヒントなどありましたらお願いします。

こんばんは、お世話になります。 配列操作で教えて頂きたく。 次のデータをuser.datとします。 1<>yamada<>99999<> 2<>tanaka<>22222<> 3<>suzuki<>10101<> 4<>yamada<>12345<> 5<>yamada<>55555<> user.datの中からyamadaの行だけ取り出して ３番目の数字データでソート表示したいのですが なかなかうまくいきません。 open(F,"user.dat"); @load_txt = <F>; close(F); foreach $data (@load_txt){ if((split(/<>/,$data)[2]) eq "$usid"){push(@txt_lines,$data);} } @txt_lines = sort{(split(/<>/,$a))[2] <=> (split(/<>/,$b))[2]}@txt_lines; 上記でおかしな所ありましたらご教示頂きたく 宜しくお願いします。

こんばんは、お世話になります。 配列操作で教えて頂きたく。 次のデータをuser.datとします。 1<>yamada<>99999<> 2<>tanaka<>22222<> 3<>suzuki<>10101<> 4<>yamada<>12345<> 5<>yamada<>55555<> user.datの中からyamadaの行だけ取り出して ３番目の数字データでソート表示したいのですが なかなかうまくいきません。 open(F,"user.dat"); @load_txt = <F>; close(F); foreach $data (@load_txt){ if((split(/<>/,$data)[2]) eq "$usid"){push(@txt_lines,$data);} } @txt_lines = sort{(split(/<>/,$a))[2] <=> (split(/<>/,$b))[2]}@txt_lines; 上記でおかしな所ありましたらご教示頂きたく 宜しくお願いします。

$session->delete(); でセッションファイルをディスクから削除使用とすると、Can't call method "delete" on an undefined value at test.pl line 471. というエラーが出てきてしまいます。 なぜでしょうか。

http://digit.que.ne.jp/work/index.cgi?Perl%A5%E1%A5%E2%2FPerl%A4%C7%A5%E1%A1%BC%A5%EB%A4%F2%BC%F5%A4%B1%A4%EB を参考にしてメールを受信するプログラムをつくってみました。 しかし、添付ファイルを別に保存する方法がわかりません。 （http://digit.que.ne.jp/work/index.cgi?Perl%A5%E1%A5%E2%2FPerl%A4%C7%A5%E1%A1%BC%A5%EB%A4%F2%BC%F5%A4%B1%A4%EB　より） if (open(OUT, ">$outfile")) { print OUT @{$message}; close OUT; } のところで　@{$message} を操作すれば、本文や添付ファイルを別々に保存することができるとおもうのですが、やり方がわかりません。ＭＩＭＥ：：Ｐａｒｓｅｒを使えばよいという情報がありましたが、日本語ファイル名で不具合があるなどという情報も見受けられます。 実際レンタルサーバにおくのでＭＩＭＩ：：Ｐａｒｓｅｒも使えるかどうか微妙です。 添付ファイルと本文を別々に保存する方法が分かる方がおられましたら、ご教授お願いします。

CSVファイル２つを検索するシステムを作成したいのですが、ロジックがわかりません。 どのように検索していけば効率的でしょうか、教えてください。 メインCSVファイル 　メインID・商品名・説明 詳細CSVファイル 　詳細ID・メインID・生産者住所・生産者氏名 で、 メインCSV１データにつき詳細CSVが複数データあります。 検索テキストボックスは１つで、 スペース区切りで複数キーワードが入ります。 検索する項目は、商品名・説明・生産者住所・生産者氏名で、複数キーワードはAND条件です。 説明出来ていますでしょうか？ よろしくお願いします。

こんばんわ　始めまして 色々お世話になると思いますが、よろしくお願いします 早速ですが質問です。 こんなことを教えて!gooでお聞きしていいのかわかりませんが 、自分のスキルは一般的にどのくらいのレベルなのかをお聞きしたいです。 現在高校一年生なのですが、HTMLとCSSは完璧に扱えます。 パールで簡単な掲示板やデータベースを作れるレベルなのですが、 やはり僕のスキルは低いのでしょうか? 経歴は一応パソコンをいじり始めてちょうど一年位です。 将来はC/C++などの言語もやろうと思っています。 こんなくだらない質問に付き合ってくださるから おられましたら答えてやってください それとプログラミングのコツ？みたいなものも一緒に教えてくださればすごくうれしいです よろしくお願いしますm(__)m

こんばんわ　始めまして 色々お世話になると思いますが、よろしくお願いします 早速ですが質問です。 こんなことを教えて!gooでお聞きしていいのかわかりませんが 、自分のスキルは一般的にどのくらいのレベルなのかをお聞きしたいです。 現在高校一年生なのですが、HTMLとCSSは完璧に扱えます。 パールで簡単な掲示板やデータベースを作れるレベルなのですが、 やはり僕のスキルは低いのでしょうか? 経歴は一応パソコンをいじり始めてちょうど一年位です。 将来はC/C++などの言語もやろうと思っています。 こんなくだらない質問に付き合ってくださるから おられましたら答えてやってください それとプログラミングのコツ？みたいなものも一緒に教えてくださればすごくうれしいです よろしくお願いしますm(__)m

以下のようなphp、MySQLのセレクト文は perlだとどのようになるのでしょうか？ $sql="SELECT abc,xyz FROM table "; $res=mysql_query($sql,$con) or die("データベースを検索できませんでした。 mysql_error(); "); $i=0; while($row=mysql_fetch_array($res)) { $abc[$i]=$row['abc']; $xyz[$i]=$row['xyz']; $i++; }

某レンタルサーバーを借りて データベースを利用しPostgreSQL、PHPで オンラインショップみたいなのを作りたいのですが、 サーバーHP上の会員コントロールパネルからテーブルはつくってもらえたのですが、そこからサポートしてくれないので作業が進みません。。。 普通どうやってレンタルサーバー内のDBにアクセスするのでしょうか？ とっても困ってます。 どなたか宜しくお願いします！！！

perlのDBIからMySQLに接続しています。 一連の処理の中で、disconnectをしても実際には暗黙的にプログラム終了時に切断されるので、厳密にはdisconnectは不要とのこと（この認識が間違っていたらご指摘ください）。 実際に試してみたら、切断した後でも同じデータベースハンドルが使用できました。 で、問題は、一連の処理の中でセッションはどのように扱われるのでしょう。切断されることなく同じセッションが使いまわされるのでしょうか？ 具体的には、以下のようなことで悩んでいます。 接続→SELECTで必要データを取得→切断 という処理をするサブルーチンがあり、このサブルーチンをメインルーチンから複数回呼び出しています。つまりロジック的には接続と切断を何度も繰り返すような流れになっています。 これはこれで期待通りの動作をするのですが、何度も接続・切断を繰り返すより、メインルーチンで一度だけ接続しておいて、そのデータベースハンドルを引数と一緒にサブルーチンに渡す、そしてメインルーチンで最後に切断、という仕様に変更したほうが、効率が良いのでは、と考えました。 しかし、ロジック的には接続・切断を繰り返しているように見えても、実際にはそれぞれ一回ずつしか行われていないのなら、カプセル化という意味ではサブルーチンの中で接続・切断を書いた方が良さそうに思えます。 実際のところ、終了処理などのタイミングが良く解っていないのがいけないのですが、どなたか、どちらが良いのか、実際に切断がいつ行われるのか、ご存知でしたら、よろしくお願いいたします。

perlのDBIからMySQLに接続しています。 一連の処理の中で、disconnectをしても実際には暗黙的にプログラム終了時に切断されるので、厳密にはdisconnectは不要とのこと（この認識が間違っていたらご指摘ください）。 実際に試してみたら、切断した後でも同じデータベースハンドルが使用できました。 で、問題は、一連の処理の中でセッションはどのように扱われるのでしょう。切断されることなく同じセッションが使いまわされるのでしょうか？ 具体的には、以下のようなことで悩んでいます。 接続→SELECTで必要データを取得→切断 という処理をするサブルーチンがあり、このサブルーチンをメインルーチンから複数回呼び出しています。つまりロジック的には接続と切断を何度も繰り返すような流れになっています。 これはこれで期待通りの動作をするのですが、何度も接続・切断を繰り返すより、メインルーチンで一度だけ接続しておいて、そのデータベースハンドルを引数と一緒にサブルーチンに渡す、そしてメインルーチンで最後に切断、という仕様に変更したほうが、効率が良いのでは、と考えました。 しかし、ロジック的には接続・切断を繰り返しているように見えても、実際にはそれぞれ一回ずつしか行われていないのなら、カプセル化という意味ではサブルーチンの中で接続・切断を書いた方が良さそうに思えます。 実際のところ、終了処理などのタイミングが良く解っていないのがいけないのですが、どなたか、どちらが良いのか、実際に切断がいつ行われるのか、ご存知でしたら、よろしくお願いいたします。

VineLinux 2.6?で Perl5.6.1を使っております。 最初 VineLinux2.5でしたがアップデートして2.6?になっております。 最近、Perl5.8系を使う必要がでてきた為、Perl5.6から Perl5.8に アップグレードしたいのですが、 運用に支障きたさず、スマートにアップグレードできる方法はあるのでしょうか？ VineLinux3の場合は Perl5.8?が入っている？ので 新規OSインストールすれば、素直ですが　設定に時間がかかるので、 サーバー環境はそのままで、Perl5.8だけアップフレードしたいです。 rpm -qa | grep perlの結果 postgresql-perl-7.2.3-0vl3 groff-perl-1.17.2-0vl4 openssl-perl-0.9.6m-0vl0.26 perl-GD-1.38-1 perl-File-MMagic-1.12-0vl3 perl-Net_SSLeay-1.13-0vl1 perl-SGMLSpm-1.03ii-4vl1 perl-DBI-1.21-0vl1 perl-5.6.1-0vl13 何やらいっぱい出てきて、このあたりの依存関係も注意？かなと ビクビクしております。 あと、5.6系で、使っていたPerlモジュールも5.8ではもう一度インストールする必要が 出てくると思いますが、5.6系のモジュールを全て表示させるツールはあるのでしょうか？ uname -a Linux ホスト名 2.4.19-0vl26 #2 2003年 1月 22日 水曜日 03:10:41 JST i686 unknown Vine Linux 2.6r4 (La Fleur de Bouard) Kernel 2.4.19-0vl26 on an i686

VineLinux 2.6?で Perl5.6.1を使っております。 最初 VineLinux2.5でしたがアップデートして2.6?になっております。 最近、Perl5.8系を使う必要がでてきた為、Perl5.6から Perl5.8に アップグレードしたいのですが、 運用に支障きたさず、スマートにアップグレードできる方法はあるのでしょうか？ VineLinux3の場合は Perl5.8?が入っている？ので 新規OSインストールすれば、素直ですが　設定に時間がかかるので、 サーバー環境はそのままで、Perl5.8だけアップフレードしたいです。 rpm -qa | grep perlの結果 postgresql-perl-7.2.3-0vl3 groff-perl-1.17.2-0vl4 openssl-perl-0.9.6m-0vl0.26 perl-GD-1.38-1 perl-File-MMagic-1.12-0vl3 perl-Net_SSLeay-1.13-0vl1 perl-SGMLSpm-1.03ii-4vl1 perl-DBI-1.21-0vl1 perl-5.6.1-0vl13 何やらいっぱい出てきて、このあたりの依存関係も注意？かなと ビクビクしております。 あと、5.6系で、使っていたPerlモジュールも5.8ではもう一度インストールする必要が 出てくると思いますが、5.6系のモジュールを全て表示させるツールはあるのでしょうか？ uname -a Linux ホスト名 2.4.19-0vl26 #2 2003年 1月 22日 水曜日 03:10:41 JST i686 unknown Vine Linux 2.6r4 (La Fleur de Bouard) Kernel 2.4.19-0vl26 on an i686

某レンタルサーバーを借りて データベースを利用しPostgreSQL、PHPで オンラインショップみたいなのを作りたいのですが、 サーバーHP上の会員コントロールパネルからテーブルはつくってもらえたのですが、そこからサポートしてくれないので作業が進みません。。。 普通どうやってレンタルサーバー内のDBにアクセスするのでしょうか？ とっても困ってます。 どなたか宜しくお願いします！！！

現在AIXにpostgreSQL(ver.7.2.1)を導入したいと考えております。 また、perlを使用し、DBI(ver.1.42)、DBD(ver.1.31_7)モジュールを使用します。 すべてのモジュールの導入は済み、検証しようとしていたところ、DBDがうまく動作していないというエラーが表示されておりました。 そこで、DBDのバージョンが違うのではないか？ということで、DBDが正常に動作できるように別バージョンを インストールしています。しかし下記のようなエラーが表示されて先に進めずに困っております。 どなたかわかる方アドバイスをお願い致します。 ◆環境 AIX5.1 postgreSQL 7.2.1 perl 5.6.0 DBI 1.42 DBD1.2 DBD1.2を導入しようとしているのですが、perl Makefile.PL を実行した時点で以下のWarningが表示されます。 ------------------------------------------------------------------------------ Warning: prerequisite Test::Simple failed to load: Can't locate Test/Simple.pm in @INC (@INC contains: t/lib / usr/opt/perl5/lib/5.6.0/aix /usr/opt/perl5/lib/5.6.0 /usr/opt/perl5/lib/site_perl/5.6.0/aix /usr/opt/perl5/lib /site_perl/5.6.0 /usr/opt/perl5/lib/site_perl .) at (eval 4) line 3. Writing Makefile for DBD::Pg ------------------------------------------------- また、次の段階のmakeコマンドを実行すると最後に以下のようなエラーが表示されストップされてしまいます。 -------------------------------------------------- ld: 0711-317 エラー: 未定義のシンボル: .is_utf8_string ld: 0711-345 -bloadmap または -bnoquiet オプションを使用して、詳細な情報を得てください。 make: 1254-004 最後のコマンドからのエラー・コードは 8 です。 -------------------------------------------------

いつもお世話になっています。 今回質問させて頂きたいことはDBのバックアップについて、です。 現在の私のサーバの構成は WEBサーバ - DBサーバ となっています。 ちなみにDBのソフトはPostgreSQLです これをWEBサーバ　- DBサーバ - DBバックアップサーバ といった構成にしたいのです。 googleで調べましたところ PGCluster PGpool Slony-I といったツールを使用することで実現出来そうなのですが レプリケーション、フェイルオーバといった機能を 使用することを前提にしているようで、端的に言えば、「高機能すぎる」のです。 pgpoolというツールは WEBサーバ - pgpool- DBサーバ（マスタ） 　　　　　　　│ 　　　　　 　DBバックアップサーバ（スレーブ） といった構成にすることで、DBサーバ（マスタ）が落ちても自動的にスレーブに切り替える といったことが実現出来るようです。 しかしこれはDBサーバの構成を切り替えることになるので、相応の能力が必要である、 といった印象を私は受けました。正直言って業務の基幹を担うDBサーバの構成を変える勇気は 私にはありません。 しかし現構成では DBサーバが物理的に壊れてしまった場合等、不安があり過ぎる状態なので DBサーバの構成は極力変更せず、DBバックアップサーバにレプリカを「保管」出来る ようなツールを探しています。 いざという時のための保険ですので、完全なレプリカでなくても良いと思っています。 よろしくご教示のほどお願い致します。

テーブルを作成するとき、各列にデータ型を指定しなければなりませんが、そもそもなんでデータ型という物が存在するのでしょうか？ いっそのことすべてtext型で扱ってしまった方が、いちいち挿入されるデータを予測してデータ型を決定する必要もないと思うのですが… （integerよりsmallintにした方が動作が速くなるとか、そういう理由なんでしょうか？） また、データ型を決定しなければいけない場合、何を基準にデータ型を決定すればいいのでしょうか。 例えば、掲示板などをデータベースで管理する場合は、ハンドルネームがどれくらいまで長い人がいるのかわからないので、結局text型になってしまいそうですが…

A.plファイルとそれに付随するpmファイルがあります。 別のB.plでA.plに値を渡しながらループさせてA.plを実行し得られた値をB.plに返すことがしたいのですが、 B.plで ループ始点 require('A.pl'); ループ終点 だと一回きりの実行結果しか得られず。 #`perl A.pl @AAA`; だとreturnできずエラー となってしまいます。 何か良い方法は無いでしょうか。 よろしくお願いいたします。