note
pvaldes
<p>Some extra notes about your code:</p>
<c>while (my ($keys, $values) = each %nums) { </c>
<p>is probably a little more readable than </p>
<c>while ((my $keys, my $values) = each (%nums)) {</c>
<p>and you could prefer also to use </p>
<c>open my $file, 'formal.xml';</c>
instead: <c>my $file;open $file, 'formal.xml');</c>
<p>and <c>print "num: $number\n";</c> instead: <c>print( "num: $number\n" );</c></p>
930826
930841