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
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.