<?xml version="1.0" encoding="windows-1252"?>
<node id="561729" title="Re: What makes File::Find's interface so commonly hated" created="2006-07-17 06:46:42" updated="2006-07-17 02:46:42">
<type id="11">
note</type>
<author id="396583">
tphyahoo</author>
<data>
<field name="doctext">
Everybody who hates File::Find should try the find2perl utility that comes bundled with perl. 
&lt;p&gt;
&lt;code&gt;
find2perl &gt; my-find-script-template.pl
chmod u+x my-find-script-template.pl
&lt;/code&gt;
&lt;p&gt;
It's  totally boneheaded utility. As far as I can tell, all it does is output the template for a basic file finder with perl, which you can then modify per your requirements.
&lt;p&gt;
Well, actually, it's a little more powerful than that, but I never figured out how to give arguments to this script. I just output and tweak.
&lt;p&gt;
And yet... and yet... what a help that is!
&lt;p&gt;
Try it if you haven't. :)</field>
<field name="root_node">
561564</field>
<field name="parent_node">
561564</field>
</data>
</node>
