問題タブ [hashref]

深くネストされた構造のハッシュがあります。ネスティングのレベルは事前にわかりません。ただし、各レベルには、「インスタンス」という 2 つのプロパティと、「依存関係」の別のハッシュがあります。したがって、これは一種の再帰的なハッシュです。

ユーザー定義の文字列を受け取り、指定された階層レベルからハッシュの内部部分を返すサブルーチンがあります。

たとえば、ユーザーが「sub_block2」を指定した場合、サブルーチンは次のハッシュを返す必要があります。

これは私のサブルーチンです:

ご覧のとおり、これは再帰関数であり、引数に一致するキーにヒットし、そのキーの下の完全なサブハッシュを返すまで、ハッシュを深く掘り下げ続けます。

これが、このサブルーチンを呼び出す方法です。

私は何を間違っていますか!?!?

編集:私の正確な問題で質問を更新しました。以前に使用した簡単な例が期待どおりに機能したようです。

事前に返信ありがとうございます

<a>タグ付きのすべての href に対して addclass() を試みています

href を除外example1.comしexample2.comたいexample3.com

しかし、私は多くのことを試しました

しかし、すべてのクラスが削除されました

私を助けてほしい

$artifactData::Dumper を使用して印刷している Perl ハッシュ参照があります。

の出力は次をprint Dumper ($artifact);返します。

しかし、URI の値に具体的にアクセスしようとすると問題が発生します。つまり、値があるかどうかを確認したいのですuri。

ありがとう！

編集：ちょっとした文脈。Artifactory::Client perl モジュールの「artifact_search」メソッドを使用しています

スレッドで perl を使用してソケット情報を処理しています

ConnectionThread は、パケットの受信と解析、およびハッシュのエンキューを担当します。

QueueThread は、Queue elelemts (ハッシュ エントリ) の処理と DB の更新を担当します。

ハッシュはイベントであり、私の %Events:shared;として宣言されています。

スレッドにハッシュ参照を渡していますが、各スレッドが異なるハッシュ参照値を取得していることに気付きました

出力は以下のとおりです

以下は完全なコードです（説明用）

以下のようなコードを持つスクリプトがあります。

perl(v5.8.8) を使用して CentOS 7.0 でローカルに実行しようとすると正常に動作しますが、同じ OS で perl(v5.16.3) を使用して同じコードを実行すると、以下のエラーが発生します。

この問題の原因となった可能性のある変更と、両方のバージョンで正しく動作するようにスクリプトを修正する最善の方法についてアドバイスをいただければ幸いです。

繰り返し処理したいネストされたデータ構造がありますが、コードが機能していないようです。エラーは表示されません。値にアクセスできる唯一の方法は、Data::Dumper

使用すると次のようData::Dumperに返されます。

この行の後のコードはどのようになりますか?

次の内容の 2 つの perl ハッシュを取得しました。

初め：

2番：

両方をマージして、次の構造を取得し、 name2 で一意のアイテムを取得するにはどうすればよいですか?