perl

4熱

2答えて

私はHTTP::Proxyモジュールを使ってPerlで簡単なHTTPプロキシを書くつもりです。私は、プロキシと基本的なフィルタとその作成方法の非常に基本的な作業ではっきりしています。しかし、私が理解できないのは、キャッシュを介して手動でファイルを強制的に処理する方法です。基本的に、このシナリオはコンピュータAでこのプロキシを実行しています。コンピュータBのユーザーがWebにアクセスすると、この

3熱

3答えて

mod_perl headers_in not working

私はRed Hat 5.2でApache 2.2.3でmod_perl 2を使用していますが、要求ヘッダーにアクセスしようとしていますが、Apache2 :: RequestRec headers_inメソッド（またはその戻り値）私が期待するように行動していない。コードフラグメント：4月::表へのアクセスとすぐに停止するように表示されて実行に WARN version 2.000004 WAR

3熱

5答えて

WebフォームをPerlで埋め込むにはどうしたらいいですか？

PerlでWebフォームを記入したいと思います。私は、これを達成するための正しい構文を見つけるのが難しいです。どのようにURLに行って、フォームを選択し、フォームに記入してからEnterキーを押して、それが提出されたことを確認しますか？

20熱

8答えて

Perlの配列（リスト）に値が存在することを確認する方法はありますか？

私は可能な値のリストを持っている： @a = qw(foo bar baz); 私は値$valが@a中に存在するかしないことを簡潔な方法で確認する方法を教えてください。明確な実装はリストをループすることですが、私は確信していますTMTOWTDI。すべての方に感謝します！私はハイライトしたい3の答えは以下のとおりです。受け入れ答え - 最も「ビルトイン」と下位互換性の方法。 RET's a

2熱

4答えて

PerlのGD :: Graphが「無効なデータセット」について不平を言っているのはなぜですか？

私は割り当てのためにPerlに小さなプログラムを書いています。私はPerlを初めて使っています。私が書いたコードは私に必要な値とまったく同じものですが、棒グラフを作成する際にこのエラーが発生しています。 Invalid data set: 0 at line 67 67行目には、次のコードにコメントがあります。 x軸に保存されている値は次のとおりです。 40 44 48 52 64 76

2熱

1答えて

Rose :: DB :: Objectメタデータからテーブルを作成することはできますか？

CPAN documentationで見つけられません - 手動で入力したRose::DB::Objectメタデータからテーブル（IF NOT EXISTS）を作成する方法はありますか？問題が発生した場合、私はエンジンとしてSQLiteを使用しています。ありがとう！

6熱

3答えて

Perlで0と空白を区別するにはどうしたらいいですか？

私は私のプログラムで次のコードがあります $val = chr(someFunction()); if($val == " ") { #do something } elsif($val == 0) { #do something else } をしかし、0は一部ではなく、私が実行され得ることを期待ELSIFを実行した場合、$ valのに渡されるたびに。ど

17熱

4答えて

XSモジュールを最初から作成する現代的な方法は何ですか？

私はPerl用のXSモジュールを書く必要があります。今日h2xsがかなり廃止されたことは私の理解であり、今日XSモジュールを始めるための好ましい方法は何ですか？私はModule :: Starterを見ましたが、純粋なPerlモジュールしか扱っていません。

1熱

2答えて

Squidプロキシユーザへのメッセージの送信

ユーザは、初めてsquidプロキシサーバを介してセッションを開始すると、ユーザにHTMLメッセージを送信できますか？私はその後セッションの残りのための彼らのブラウジング要求の残りの部分はリダイレクトされずに行く.... 日"の"メッセージへのユーザーの最初の要求をリダイレクトすることができるようにしたい.... 。詳細な手順：ユーザーがブラウザを開きます。（ブラウザはSquidプロキシ

1熱

3答えて

Perlで正規表現を使用して一致する要素

私は、正規表現を含むハッシュを持っています：それに取り込まれるマッチの数と変数とマッチの位置。たとえば： my %hash = ( reg_ex => 'Variable1:\s+(.*?)\s+\n\s+Variable2:\s+(.*?)\s+\n', count => 2, Variable1 => 1, Variable2 => 2, ); 私は