[{"data":1,"prerenderedAt":48},["ShallowReactive",2],{"\u002Fperl-hashref-iteration-example":3},{"id":4,"title":5,"body":6,"createdAt":36,"description":12,"draft":37,"extension":38,"image":39,"mastodonThread":39,"meta":40,"navigation":41,"path":42,"seo":43,"stem":44,"tags":45,"updatedAt":46,"__hash__":47},"content\u002FPerl hashref iteration example.md","Perl_hashref_iteration_example",{"type":7,"value":8,"toc":33},"minimark",[9,13,24,27,30],[10,11,12],"p",{},"Here is an example of iterating over a nested hashref datastructure in Perl.",[14,15,20],"pre",{"className":16,"code":18,"language":19},[17],"language-text","$domaindb = {\n  'thelackthereof.org' => {\n    'owner' => 'brock',\n    'services' => {\n      'web' => 1,\n      'dns' => 0,\n      'email' => 1\n    }\n  },\n  'brockwilcox.org' => {\n    'owner' => 'awwaiid',\n    'services' => {\n      'web' => 1,\n    }\n  }\n};\n\nforeach $domain (keys %{$domaindb}) {\n  print \"Domain: $domain\\tOwner: $domaindb->{$domain}->{owner}\\n\";\n}\n","text",[21,22,18],"code",{"__ignoreMap":23},"",[10,25,26],{},"Which outputs:",[14,28,29],{},"Domain: thelackthereof.org      Owner: brock\nDomain: brockwilcox.org         Owner: awwaiid\n",[10,31,32],{},"Fun, eh?",{"title":23,"searchDepth":34,"depth":34,"links":35},2,[],"2003-11-10T11:55-05:00",false,"md",null,{},true,"\u002Fperl-hashref-iteration-example",{"title":5,"description":12},"Perl hashref iteration example",[],"2010-06-08T20:57-04:00","f_ckBqrIftytlpXpLGpS_Vr0IRLB1lhXij7QlhZsqaU",1778988312683]