<?xml version="1.0" encoding="windows-1252"?>
<node id="133336" title="Re: TMTOWTDI Puzzle: Generating a range of numbers" created="2001-12-19 22:41:25" updated="2005-07-21 01:30:29">
<type id="11">
note</type>
<author id="961">
Anonymous Monk</author>
<data>
<field name="doctext">
OT - not really a Perl solution, and relies on default conditions.  Probably breaks the 'no modules' rule as well.
&lt;p&gt;
&lt;code&gt;perl -e "`head /etc/group | grep -n . | sed -e 's/:.*//'`"&lt;/code&gt;
&lt;p&gt;
Just my $.02</field>
<field name="root_node">
132969</field>
<field name="parent_node">
132969</field>
<field name="reputation">
3</field>
</data>
</node>
