<?xml version="1.0" encoding="windows-1252"?>
<node id="1007717" title="Re^2: perl script to print just directory names" created="2012-12-07 06:47:03" updated="2012-12-07 06:47:03">
<type id="11">
note</type>
<author id="324763">
marto</author>
<data>
<field name="doctext">
&lt;p&gt;&lt;i&gt;"but can please someone show me how to store these basenames in some sort of array so that i can use them later part in the code."&lt;/i&gt;&lt;/p&gt;
&lt;p&gt;Consider reading and understanding the code you've posted, you already do this for a different array/value:&lt;/p&gt;
&lt;c&gt;
push(@dir, $file);
&lt;/c&gt;
&lt;p&gt;So rather than print the value of &lt;c&gt;basename($file)&lt;/c&gt; to screen push the value of &lt;c&gt;basename($file)&lt;/c&gt; into &lt;c&gt;@dir_names&lt;/c&gt;.Read [doc://push], [http://learn.perl.org].&lt;/p&gt;
&lt;p&gt;&lt;b&gt;Update:&lt;/b&gt; slight clarification.&lt;/p&gt;</field>
<field name="root_node">
1007640</field>
<field name="parent_node">
1007714</field>
</data>
</node>
