perl -e 'my %hash=(q|a|=>100,q|b|=>300); use Data::Dumper; my $obj = D +ata::Dumper->new([\%hash],[qw|foo|]); print $obj->Dump();' $foo = { 'a' => 100, 'b' => 300
Maybe stop putting $VAR in the output in the first place?
Celebrate Intellectual Diversity
In reply to Re: trouble with substitution
by InfiniteSilence
in thread trouble with substitution
by Interzona
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |