<?xml version="1.0" encoding="windows-1252"?>
<node id="996813" title="Re: new to perl, need some help" created="2012-10-02 02:48:35" updated="2012-10-02 02:48:35">
<type id="11">
note</type>
<author id="861371">
kcott</author>
<data>
<field name="doctext">
&lt;p&gt;G'day [kingpin007],&lt;/p&gt;
&lt;p&gt;Welcome to the monastery.&lt;/p&gt;
&lt;p&gt;
I see [NetWallah]++ has provided the answer to your posted question. Here's a couple of additional points.
&lt;/p&gt;
&lt;p&gt;
Your shebang line needs to start with &lt;c&gt;#!&lt;/c&gt;, not &lt;c&gt;!#&lt;/c&gt;. I suspect this is simply a typo but if you run this code you'll get the (possibly rather cryptic) message: &lt;em&gt;"Can't modify not in scalar assignment"&lt;/em&gt;.
&lt;/p&gt;
&lt;p&gt;
When you have sequences of numbers, you can use the range operator (&lt;c&gt;..&lt;/c&gt;). Instead of &lt;c&gt;qw(1 2 3 4 5 10 11 12 13 14)&lt;/c&gt;, you can just type &lt;c&gt;(1 .. 5, 10 .. 14)&lt;/c&gt;. This is described in [http://perldoc.perl.org/perlop.html#Range-Operators|perlop - Range Operators].
&lt;/p&gt;

&lt;!-- Node text goes above. Div tags should contain sig only --&gt;
&lt;div class="pmsig"&gt;&lt;div class="pmsig-861371"&gt;
&lt;p&gt;-- Ken&lt;/p&gt;
&lt;/div&gt;&lt;/div&gt;
</field>
<field name="root_node">
996795</field>
<field name="parent_node">
996795</field>
</data>
</node>
