<?xml version="1.0" encoding="windows-1252"?>
<node id="987173" title="Re: Serialization and eval in YAML" created="2012-08-13 14:15:44" updated="2012-08-13 14:15:44">
<type id="11">
note</type>
<author id="449608">
thundergnat</author>
<data>
<field name="doctext">
&lt;blockquote&gt;&lt;pre&gt;
use Data::Dumper;
@arg2 = &amp;#91;{a =&gt; 1, b =&gt;2}&amp;#93;, &amp;#91;qw($balloon)&amp;#93;;
Data::Dumper-&gt;Dump(@arg2)

gives

'$balloon = {
             \'a\' =&gt; 1,
             \'b\' =&gt; 2
};
&lt;/pre&gt;&lt;/blockquote&gt;

&lt;p&gt;Really? Using no version of Perl that I've ever used.&lt;/p&gt;

&lt;c&gt;
use warnings;
use Data::Dumper;
@arg2 = [{a =&gt; 1, b =&gt;2}], [qw($balloon)];
print Data::Dumper-&gt;Dump(@arg2)
&lt;/c&gt;

&lt;pre&gt;
Useless use of anonymous list (&amp;#91;&amp;#93;) in void context at dd.pl line 3.
$VAR1 = &amp;#91;
          {
            'a' =&gt; 1,
            'b' =&gt; 2
          }
        &amp;#93;;
&lt;/pre&gt;
&lt;p&gt;Precedence problem. You need parenthesis around the array. And lose the sigil on $balloon.&lt;/p&gt;

&lt;p&gt;&lt;b&gt;Update:&lt;/b&gt; removed some unnecessarily snarky commentary. &lt;/p&gt; 
</field>
<field name="root_node">
987152</field>
<field name="parent_node">
987152</field>
</data>
</node>
