perl

    3

    1答えて

    私は、特定の行の最後に文字列を追加し、ホスト上の1つのライナーを実行すると動作します。例えば、私は完全に「AllowUsersという」 perl -pi.bak -e 's/^(AllowUsers.*)/\1 boy857sr xxxxxxx/g;' /etc/ssh/sshd_config 作品で始まる行の末尾に「boy857srのXXXXXXX」を追加していますよ! AllowUsers

    1

    1答えて

    長期的に実行される可能性のあるプロセスを呼び出すアプリケーションがあります。このプロセスの呼び出し元である私のプログラムは、任意の時点でキャンセルし、制限時間を超えたときに次のエントリに移動します。彼らはちょうど行き続ける、 #!/usr/bin/env perl use Modern::Perl '2017'; use Path::Tiny; use EV; use AnyEvent;

    0

    3答えて

    私はこれが重複しているとは思わない、私は同じタイトルの他のすべての科目を探していたからです。 while ($n>0) { if (($n%10)%2 eq 0) $k = $k+1; $n = $n/10; } は、私は数N にあり、私は私のプログラムを実行しようとすると、このエラーが示されているどのように多くの偶数計算うプログラムを作った::だから、ここに

    2

    1答えて

    私はperlで表現している場合: isOKはレコードのプロパティです。そうunlessは、論理式の前!であるものは何でも、JavaScriptで対応 if (!record.isOK) :それは私の理解では、それはとJavaScriptで同等である1または0 unless (record.isOK) です。 これは間違いありませんか?

    -1

    1答えて

    文字 'n'、 's'、 'e'、 'w'を含むファイルを読み込もうとしています。 「N」または追加「S」を減算することを意味どのように私は、これらの文字を探して、$nsと$ewという変数に追加しない、 $ns 。 $ewは、「e」を追加するか「w」を減算することを意味します。 これは私が持っているものです。 open (FILE, 'randwalk1') or die "Could not

    -3

    1答えて

    以下は私のループです(perl-CGIスクリプトの一部として書かれています)。私はHTMLのテーブルタグを使用して私のWebページの表に印刷したい。どうすればいい? for($ff=0;$ff<scalar @phi;$ff++) { print $res[$ff],"---->"; printf("%0.2f",$omg[$ff]); print "<br>";

    0

    1答えて

    私は、スレッドとフォークモジュールをそれぞれ使って、WindowsとLinux用のPerlマルチスレッドソフトウェアを開発しています。 標準出力をシェルに向けるとすべてうまく動作しますが、スクリプトにTkモジュールを組み込んでGUIを作成すると、Windows版のアプリケーションだけがうまく動作します(実際はうまくいきませんが、出力は受け入れられます)。私がLinux上でForksモジュールとスク

    2

    3答えて

    スカラーの後にwhileループは停止しません$quitは明らかに 'j'に等しくありません。 なぜ停止しませんか? #!/usr/bin/perl -w use strict; my $quit = 'j'; while ($quit eq 'j') { print "Enter whatever value you want and I bet I still contin

    0

    1答えて

    ユーザが求めるフォームで加算と減算のサブルーチンを作成する方法2つの異なる数字を入力し、合計が最初に入力する数字で、入力した2番目の数字を減算します。 use CGI qw (:standard); print header; print start_html; if (!param) { print "<form action='$ENV{SCRIPT_NAME}' metho