• [解決済み] error.pmが提供するperlのtryキャッチを正しく使うには?

    質問 というモジュールがあることを知りました。 エラー は、java のような try と catch の機能を提供します。 しかし、私はあなたが返された例外を表示することができますどのように混乱しています。 次のような方法を理解したいと思います。 try { // do something that will fail! } catch (Error e) {

    2022-03-08 19:54:05
  • [解決済み] データファイルを配列に読み込む正しい方法

    質問 私はデータファイルを持っており、各行には1つの数字があり、次のようになります。 10 20 30 40 このファイルを読み込んで、データを配列に格納するにはどうすればよいのでしょうか? この配列に対して何らかの操作を行うことができるようにするためです。 どのように解決するのですか? ファイルを配列に読み込んで、1要素につき1行ずつ読み込むだけなら簡単です。 ope

    2022-03-06 21:28:09
  • [解決済み] Perlで=~は何をするのですか?[クローズド]

    質問 <パス この質問は、将来の訪問者の役に立ちそうもありません。狭い地域、特定の瞬間、または極めて狭い状況にのみ関連しており、インターネットの世界中の視聴者に一般的に適用できるものではありません。この質問をより広く適用できるようにするために ヘルプセンターへ .

    2022-03-06 19:19:39
  • [解決済み] Perlの "bless "は具体的に何をするのですか?

    質問 Perlでは、クラスの"new"メソッドの中で"bless"キーワードを使用するそうですが、このキーワードは何ですか? sub new { my $self = bless { }; return $self; } しかし、そのハッシュ参照に対して "bless" は一体何をしているのでしょうか? どのように解決するのか? 一般的には bles

    2022-03-04 10:53:42
  • [解決済み] bcryptで保存したハッシュを復号化する方法

    質問 パスワードを暗号化するスクリプトがあるのですが、それを逆にして復号化する方法がわかりません。これは非常に簡単な答えかもしれませんが、私はそれを行う方法を理解していない。 #!/usr/bin/perl use Crypt::Eksblowfish::Bcrypt; use Crypt::Random; $password = 'bigtest'; $encrypted = encr

    2022-03-02 23:48:51
  • [解決済み] Perlの配列を表示する簡単な方法?(少しの書式設定付き)

    質問 はあるのでしょうか? 簡単 Perl の配列を各要素の間にカンマを入れて出力する方法は? それを行うためにforループを書くことはかなり簡単ですが、かなりエレガントではありません...それが意味をなさないならば。 どのように解決するのか? ただ join() : # assuming @array is your array: print join(", ",

    2022-03-01 16:45:05
  • [解決済み] サーバーサイドインクルードでPerlを呼び出すと "suexec policy violation "となる原因は何ですか?

    質問 Apache 2 サーバー上のサーバーサイドインクルードから呼び出される Perl スクリプトを作成しています。このスクリプトは、実際のエラーを表示するのではなく、一般的な "Internal Server Error" ページを表示しています。Apacheのエラーログをチェックすると、これらのメッセージが表示されます。 unable to include "/foobar/inde

    2022-02-28 16:45:19
  • [解決済み] エラーが発生しました。厳密なサブスクリプションの間、ベアワード "params "は許可されません。

    質問 送信ボタンをクリックした後、エラーが発生します。 Bareword "params" not allowed while "strict subs" in use at /var/www/path/get.pl line 71 71行目 my @names = params; 私は use strict; ほぼ一番上にあります。 修正方法は? 注:旧サーバー

    2022-02-28 03:44:14
  • [解決済み] Use of uninitialized value in string ne "というエラーはどこから発生するのでしょうか?

    質問 の初期化されていない値はどこにあるのでしょうか? 以下のコード ? #!/usr/bin/perl use warnings; my @sites = (undef, "a", "b"); my $sitecount = 1; my $url; while (($url = $sites[$sitecount]) ne undef) { $sitecount++; }

    2022-02-26 15:13:01
  • [解決済み] Perlでmkdirを使用してフォルダを作成するには?

    質問 特定のパスにフォルダを作成したい。 mkdir . 解決方法は? 想定されること D:/Test/Data が存在する。 my $dir_qfn = 'D:/Test/Data/foo'; mkdir($dir_qfn) or $!{EEXIST} # Don't die if $dir_qfn exists. or die("Can't create d

    2022-02-25 12:40:35
  • [解決済み] Perl で STDOUT->autoflush(1) は何をするのですか?

    質問 Perlのオートフラッシュに関する情報はいろいろとありますが、このような書式の行についての言及は見当たりません。 STDOUT->autoflush(1); これは、私が解析しているプログラムに含まれているもので、これが何をするものなのかをもっと理解したいのです。また、プログラムの冒頭にはこんなものもあります。 use IO::Handle; ...関連しているか

    2022-02-19 19:28:22
  • [解決済み] Perlでタイムアウトを行う方法?

    質問 Perlで特定のコード片の実行時間の上限を設定するために、次のパターンをよく使います。 my $TIMEOUT_IN_SECONDS = 5; eval { local $SIG{ALRM} = sub { die "alarm\n" }; alarm($TIMEOUT_IN_SECONDS); # do stuff that might timeout.

    2022-02-19 12:55:34
  • [解決済み] perl で awk コマンドを実行する

    質問内容 以下のようなタブ区切りファイル(ダミー)があります。 a b a b a c a c a b を書こうとしているのですが awk コマンドを、file.txt を作成する perl スクリプトの中で実行します。 awkコマンドは. $n=system(" awk -F"\t" '{if($1=="a" && $2=="b") print

    2022-02-18 17:22:47
  • [解決済み] Perlでディレクトリ一覧を取得するには?[重複している]。

    質問 <余談 この質問には、すでにここで回答があります : Perlでディレクトリの中身を読み込むには? (9件) クローズド 6年前

    2022-02-18 11:01:24
  • [解決済み] Perlスクリプトにコンパイルエラーがないことを確認する方法は?

    質問 Bashスクリプトの中で多くのPerlスクリプトを呼び出しています(cshからも呼び出すことがあります)。 Bashスクリプトの最初に、すべてのPerlスクリプトにコンパイルエラーがないかどうかをチェックするテストを置きたいと思います。 これを実現する一つの方法は、Bashスクリプトから実際にPerlスクリプトを呼び出すことである。 grep しかし、Perlスクリプトがコー

    2022-02-18 09:51:54
  • [解決済み] Perlで整数の除算はどのようにすればよいのですか?

    質問 の良い方法は何ですか? 常に Perlで整数の除算をする? 例えば、私が欲しいのは real / int = int int / real = int int / int = int 解決方法は? Perlではintをキャストすることができます。 int(5/1.5) = 3;

    2022-02-18 08:17:11
  • [解決済み] Perlで環境変数を設定するには?

    質問 Perlで環境変数を設定するには? を設定したい。 $HOME をデフォルトとは異なるディレクトリにコピーします。 どのように解決するのですか? こんな風にできるんです。 $ENV{HOME} = 'something different'; しかし、これは残りのスクリプトの中でしか効果がないことに注意してください。スクリプトが終了するときに 呼び出したシェル

    2022-02-18 05:18:19
  • [解決済み] MOSSスクリプトはどのように使うのですか?

    質問事項 Mac OS XでMOSSを実行しようとしているのですが、どのような間違いを犯しているのかわかりません。コマンドを正しく実行できているのかどうか、よくわかりません。ダウンロードしたのは これ ファイルを'moss'とし、この実行権限を与えて、以下のように実行してみました。 ./moss -l python -c "Assignment 1" -d assignment1/

    2022-02-17 22:59:13
  • [解決済み] Perlでディレクトリを丸ごとコピーするにはどうしたらいいですか?

    質問 ディレクトリ全体をある場所にコピーする必要があります。 どのようにすればよいのでしょうか? File::Copy は、私が見た限りでは、ファイルごとにしかコピーしません。 ちなみに私はWindowsで作業しています。 ありがとうございました。 どのように解決するのですか? を調べてみてください。 ファイル::コピー::リカーシブ .

    2022-02-14 21:42:23
  • [解決済み] Perlで日付/時刻をエポックタイム(1970年からのunix時間/秒)に変換するには?

    質問内容 日付/時刻が(年、月、日、時、分、秒)の配列である場合、エポック時間、すなわち1970-01-01 00:00:00 GMTからの秒数にはどのように変換しますか。 ボーナス質問です。日付/時刻が文字列として与えられた場合、まずどのようにそれをパースして (y,m,d,h,m,s) 配列に入れますか? どのように解決するのですか? これは、unixの時間を取得する最も簡単

    2022-02-14 12:46:35