perl

プロセスpsコマンドがディレクトリの周りにスラッシュの代わりにスペースを表示するのはなぜですか?
perl

プロセスpsコマンドがディレクトリの周りにスラッシュの代わりにスペースを表示するのはなぜですか?

実行中のプロセスを取得する前に失敗したプロセスモニターをデバッグしようとしています。私はこれが不思議なLinux動作のために起こったと確信しています。実行中のプロセスは/opt/my/path/directoryname/daemonnameですが、奇妙な理由でディレクトリ名の周りに/の代わりにスペースが表示されます。多くのデーモンが同じディレクトリで実行されており、正しいパスで表示されます。各サーバーの特定のデーモンだけです。 ps -efこのデーモンについては、以下を表示します。 /opt/my/path directoryname daemonname...

Admin

子プロセスの出力をキャプチャする方法は?
perl

子プロセスの出力をキャプチャする方法は?

sftpのパスワードプロンプトをキャッチしようとしていますが、STDINやSTDERRからは出ません。子プロセスで発生する可能性があります。 以下は私のテストです。パスワードプロンプトをファイルにリダイレクトしてみました。ファイルハンドル番号1〜4を試してみました。しかし、成功しませんでした。 mypc:/home/myname$ sftp localhost >/tmp/junk myname@localhost's password: mypc:/home/myname$ sftp localhost 2>/tmp/junk myname@...

Admin

awk:最初の列に基づいてソートし、2番目の列のみを出力し、2番目の列をすべて出力します。
perl

awk:最初の列に基づいてソートし、2番目の列のみを出力し、2番目の列をすべて出力します。

次のように作成できる2つの列ファイルがあります。 cat > twocol << EOF 007 03 001 03 003 01 137 12 001 11 002 01 002 02 002 03 001 02 002 04 137 94 010 21 001 01 EOF 生成されたファイルにはtwocol垂直線のみが含まれています。 希望する結果 twocolある種のコマンドを実行し、次の結果を得たいと思います。 (私はもう少し混乱している質問のタイトルをもう一度説明するよりもはるかに優れていると思います。」出力します。」 00...

Admin

しきい値より小さい数字で一番長い一連の行を印刷するには?
perl

しきい値より小さい数字で一番長い一連の行を印刷するには?

私はPerlを学んでいますが、この問題を解決する方法がわかりません。 .txt次の形式のファイルがあります。 1 16.3346384 2 11.43483 3 1.19819 4 1.1113829 5 1.0953443 6 1.9458343 7 1.345645 8 1.3847385794 9 1.3534344 10 2.1117454 11 1.17465 12 1.4587485 最初の列には行番号のみが含まれており、ここでは興味がありませんが、2番目の列の値は関連部分です。 2番目の列に2.00未満の数値を持つ最長の連続行シーケンスを出力...

Admin

Emacs(シェル)で `perldoc`を使用する方法は?
perl

Emacs(シェル)で `perldoc`を使用する方法は?

Emacsでプログラミングするときは、マンページをよく参照します。私の環境はSSH経由のテキストベースのEmacsです。 manコマンド(関数)を使用してEmacsで「一般」のマニュアルページを開くことができますが、EmacsでPerl PODドキュメントを使用する(man MAN-ARGS)方法を知りたいです。 (関数)で実行すると(例:)、メッセージを受け取ります説明:perldocperldoc -f packshell(shell &optional BUFFER) 警告:端末は完全に機能しません。 特に、ターミナルラインの数は、Emac...

Admin

コンテンツの検索と置換
perl

コンテンツの検索と置換

PIN A 1 1:3 0:8 0 0:0 PIN B 1 1:0 0 0:0 Z Z:0 PIN C 1 1:3 0:8 0 0:0 Z Z:0 PIN Bには影響を与えずにPIN AとPIN Cの内容のみを変更したいと思います。 0 0:3 Z 0:3 一般的な検索と置換方法を使用して、PIN Bの内容に影響を与えずに置き換える方法を見つけることができないようです。 perl -i -pe 's/0:0/0:3/g;' text perl -i -pe 's/Z:0/Z:3/g;' text 希望の出力: PIN A 1 1:3 0:8 0 0...

Admin

sed 変更 + 対応する perl 構文の報告
perl

sed 変更 + 対応する perl 構文の報告

LinuxとPerlを学ぶ初心者: (a)代替文字列を検索し、(b)ファイル名パターンを一致させたい。.myfile, (c) サブディレクトリから再帰的に検索し、 (d) 行番号、ファイル名、元の行、変更された行を印刷します。 sed私は使用するバージョンと構文の両方を探していますperl。私はここで出発点を見つけました質問しかし: まず:sed 必須: パターン一致構文の追加.myfile、再帰的に検索し、行番号を印刷して削除します。w /dev/fd/2- 何をしているのかわかりません。ファイルを出力するのではなく、結果を端末に印刷したいです。注:私は...

Admin

クラスター分析のためのPDLの使用開始PDL::Stats::Kmeans
perl

クラスター分析のためのPDLの使用開始PDL::Stats::Kmeans

最初の質問は「パールデータ言語が死んでいますか?」です。活発な議論やユーザーのQ&Aが見つかりませんでした。 より良いタグを付けなかったので申し訳ありません。担当者はいません。 私の問題は、電源スイッチングイベントを分析し、応答性と抵抗性負荷の測定値を再接続して、工場ハードウェアの特定の項目を指すことです。 だからクラスタ分析を考えてPDLに移しました。 私が書いたPerlスクリプトから use PDL::Stats::KMeans; my $sql = "select resistv_chg,reactv_chg from metered_even...

Admin

2番目のパターンに固有の2つのパターン間のすべての線を見つけますか?
perl

2番目のパターンに固有の2つのパターン間のすべての線を見つけますか?

以下にリストされているファイルがあると思います。正規表現パターンの各インスタンスですべてのWord A行を選択する必要があります。今後正規表現パターンWord D。 Word A Word B Word C Word D Word E Word F Word G Word A Word H Word I Word D Word J Word A Word K Word D Word L Word M Word A Word D Aとの間の行数は異なりますD。時にはD次の行があります。これは私が必要とする出力です。 Word A Word B Word C ...

Admin

Perlの`kill`は予想外の`$! == Errno::EINTR` を使用します。
perl

Perlの`kill`は予想外の`$! == Errno::EINTR` を使用します。

TCP接続を処理するためにサブプロセスをフォークするネットワークデーモンを作成しました。SIGINT基本プロセスの各サブプロセスに対して1つずつトリガーして、いくつかのkill最終統計をクリーンアップして収集します。 ほとんどすべてのケースでうまく機能し、サブプロセスは非常に迅速に終了します。ただし、場合によっては、サブプロセスが短いタイムアウト(たとえば5秒)以内にシャットダウンを拒否することがあります。 当時何が起こったのかわからないので、状況を診断するために詳細な出力を追加しました。netcat接続を開いてプロセスを一時停止することがわかりましたnet...

Admin

ARGV []はパラメータを受け入れません。
perl

ARGV []はパラメータを受け入れません。

パラメータを渡そうとするシェルスクリプトがあり、スクリプトに空の出力が表示されますdate。ARGV[1] これはコマンドです: #!/bin/bash dt=$(date -d "yesterday" '+%m%d%Y') cat /tmp/log.$AUTOSERVE.$dt \ | perl -ne '/STATUS:\s+(\w+).+MACHINE:\s+(\w+.\w+.\w+)$/ && print join( "\t", $1, $2 ). "\n"' \ | grep -E '(SUCCESS|FAILURE|TER...

Admin

TCP接続を受け入れる前にピアアドレスを確認できますか?
perl

TCP接続を受け入れる前にピアアドレスを確認できますか?

私はTCPポート/ソケットをリッスンして接続を受け入れる単純なPerlサーバーを作成しました。今私は知りたいです: アドレスベースのアクセス制御を実装する場合は、接続を受け入れる前に接続を要求するピアのアドレスを確認できますか? 可能であれば、接続を受け入れてすぐに再度閉じるのではなく、接続要求を拒否できます(希望)。 ...

Admin

bash +特定のパスの下のフォルダが数字で終わるかどうかを確認する方法
perl

bash +特定のパスの下のフォルダが数字で終わるかどうかを確認する方法

/var/kafkaフォルダの下のすべてのフォルダが数字で終わっていることを確認したいと思います。それ以外の場合、エラーが発生して終了します。 ls -ltr /var/kafka drwxr-xr-x 399 kafka kafka 28672 Nov 9 13:10 data6 drwxr-xr-x 392 kafka kafka 28672 Nov 9 13:10 data5 drwxr-xr-x 391 kafka kafka 28672 Nov 9 13:10 data1 drwxr-xr-x 405 kafka kafka 28672 N...

Admin