Jay Hannah <span dir="ltr"><<a href="mailto:jay@jays.net">jay@jays.net</a>></span> wrote:<br>> next if ($audit->{$date} && $audit->{$date}->{$hotel} && $audit->{$date}->{$hotel} > 0);<br>
<br>Sterling Hanenkamp wrote:<br>
> I usually prefer:<br>
> next if ($audit->{$date}{$hotel} || 0) > 0;<br>
<br>Ok, I'm getting a similar issue with this bit of code:<br><span style="font-family: courier new,monospace;">55 } else {</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">56 ($value, $parm)=split(/\s+/,$line,2);</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">57 $myhash1{$section_name}{$parm} = $value;</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">58 }</span><br style="font-family: courier new,monospace;">
<br>Line 57 is spitting a lot of "Use of unitialized value in hash element" warnings -- I'm pretty certain it's because of the newly defined %<span style="font-family: courier new,monospace;">myhash1</span> hash instantly having the $section_name and $parm keys used right away.<br>
<br>I tried putting in these lines between 56 and 57:<br><span style="font-family: courier new,monospace;">55 } else {</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">
56 ($value, $parm)=split(/\s+/,$line,2);</span><br style="font-family: courier new,monospace;"><span style="font-family: courier new,monospace;">
57 ($myhash1{$section_name} || 0);</span><br style="font-family: courier new,monospace;" clear="all"><span style="font-family: courier new,monospace;">58 ($</span><span style="font-family: courier new,monospace;">myhash1</span><span style="font-family: courier new,monospace;">{$section_name}{$parm} || 0);</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">59 $</span><span style="font-family: courier new,monospace;">myhash1</span><span style="font-family: courier new,monospace;">{$section_name}{$parm} = $value;</span><br style="font-family: courier new,monospace;">
<span style="font-family: courier new,monospace;">
60 }</span><br>...but the warnings still persist.<br><br>Aside from turning off warnings for these lines, is there a better way to handle this? Should I be pre-loading the "$myhash1{$section_name}" branch first before adding the "{$parm}" branch to it?<br>
<br>Dan<br clear="all"><br>-- <br>"Quis custodiet ipsos custodes?" (Who can watch the watchmen?) -- from the Satires of Juvenal<br>"I do not fear computers, I fear the lack of them." -- Isaac Asimov (Author)<br>
** *** ***** ******* *********** *************<br>