<?xml version="1.0" encoding="windows-1252"?>
<node id="948188" title="Re: Printing the elements of array" created="2012-01-16 12:47:44" updated="2012-01-16 12:47:44">
<type id="11">
note</type>
<author id="258724">
Not_a_Number</author>
<data>
<field name="doctext">
&lt;c&gt;use strict;
use warnings;

my @array = ( 5, 4, 10 );
my $start = 1;
my $sum = 0;

for my $num ( @array ) {
  $sum += $num;
  print "$start-$sum\n";
  $start += $num;
}&lt;/c&gt;</field>
<field name="root_node">
948185</field>
<field name="parent_node">
948185</field>
</data>
</node>
