Help for this page
my $foo = { }; $foo->{a}->{b}->{c}->{d} = 1; use Data::Dumper; print Data::Dumper->Dump([$foo],['foo']);
$foo = { 'a' => { 'b' => { ... } } };
my $bar = $foo->{a}->{d}; print %$bar if $bar;
www.com | www.net | www.org
No recent polls found