<?xml version="1.0" encoding="windows-1252"?>
<node id="568262" title="Re^4: What I Most Recently Learned in Perl, But Should Have Already Known" created="2006-08-18 16:43:23" updated="2006-08-18 12:43:23">
<type id="11">
note</type>
<author id="463329">
izut</author>
<data>
<field name="doctext">
&lt;p&gt;
I think this way is prettier.
&lt;/p&gt;
&lt;code&gt;
sub do_something {
    my ($function) = @_;
    $function = 'default' unless exists $functions{$function};
    $functions{$function}-&gt;();
}
&lt;/code&gt;
&lt;!-- Node text goes above. Div tags should contain sig only --&gt;
&lt;div class="pmsig"&gt;&lt;div class="pmsig-463329"&gt;
&lt;p/&gt;
Igor 'izut' Sutton&lt;br/&gt;
&lt;em&gt;your code, your rules.&lt;/em&gt;
&lt;/div&gt;&lt;/div&gt;</field>
<field name="root_node">
567774</field>
<field name="parent_node">
568217</field>
</data>
</node>
