このダンプ出力によって表されるハッシュにどのようにアクセスできますか？

Question

私はgit-svn Perlスクリプトをハッキングしています。私は$pathsという変数を持っていますが、それは個々のパスの配列が含まれていると思いますが、その上で反復するのは苦労しています。私の最終目標は、1つのパスに追加の属性を追加することです。

ここにダンパ出力があります。

{ 
    "/dira" => { 
     action  => "A", 
     copyfrom_path => undef, 
     copyfrom_rev => -1 
    }, 
    "/dira/dirb" => { 
     action  => "A", 
     copyfrom_path => undef, 
     copyfrom_rev => -1 
    }, 
    "/dira/dirb/test.55mb.file" => { 
     action  => "A", 
     copyfrom_path => undef, 
     copyfrom_rev => -1 
    }, 
} 

Answer 1

その出力によれば、$pathsはハッシュへの参照のハッシュへの参照です。あなたが拡張したいパスがわかっている場合

、あなたが反復する必要はありません：あなたはすべてのパスに均等にこれをしたい場合は

$paths->{'/foo/bar'}{'my_attribute'} = 42; 

を、あなたはこれを行うことができます。

for my $attrs (values %$paths) { 
    $attrs->{'my_attribute'} = 42; 
} 

ハッシュについてはperldoc perldata、参照およびネストされたデータ構造についてはperldoc perlreftutを参照してください。