Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: How can I acces the "member" stepxxx of the structure given below?

by dorko (Prior)
on Feb 05, 2016 at 14:23 UTC ( [id://1154483]=note: print w/replies, xml ) Need Help??


in reply to How can I acces the "member" stepxxx of the structure given below?

Without any other context, this will give you something to work with:

use strict; use warnings; use 5.016; use Data::Dumper; my @array_of_hashes = { 'opt' => { 'step820' => '0', 'step190' => '0', 'step124' => '0', 'step127' => '0', 'step410' => '0', 'step015' => '2', 'step130' => '1', 'step013' => '0', 'step715' => '0', 'step540' => '0', 'step800' => '5', 'step135' => '0', 'step003' => '0', 'step455' => '0', } }; say Dumper @array_of_hashes; foreach my $step_number ('step001' .. 'step820') { next if (not defined $array_of_hashes[0]{opt}{$step_number}); say $step_number . " = " . $array_of_hashes[0]{opt}{$step_number}; + }

Interesting output:

step003 = 0 step013 = 0 step015 = 2 step124 = 0 step127 = 0 step130 = 1 step135 = 0 step190 = 0 step410 = 0 step455 = 0 step540 = 0 step715 = 0 step800 = 5 step820 = 0

Cheers,

Brent

-- Yeah, I'm a Delt.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1154483]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others romping around the Monastery: (4)
As of 2024-04-18 17:36 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found