How do I control the variable names in Perl's Data::Dumper?

I've got this simple Perl script:

#! /usr/bin/perl -w

use strict;
use Data::Dumper;

my %foo = ( 'abc' => 1 );

print Dumper(\%foo);

It outputs:

$VAR1 = {
          'abc' => 1
        };

How do I make it output this instead?

%foo = (
         'abc' => 1
       );

Answers


print Data::Dumper->Dump( [ \%foo ], [ qw(*foo) ] );

The extended syntax takes two arrayrefs: one of scalars to dump, and one of names to use. If the name is prefixed by * and the corresponding scalar is an arrayref or hashref, an array or hash assignment is produced.


In addition to ysth's answer, you can use Ovid's Data::Dumper::Names module.


use Data::Dumper;

$Data::Dumper::Terse = 1;

print '%foo = '.(Dumper \%foo);

Also, Data::Dumper::Simple does roughly that.


Need Your Help

Creating a dynamic choice field

python django django-forms django-templates

I'm having some trouble trying to understand how to create a dynamic choice field in django. I have a model set up something like:

R: How to extract dates from a time series

r date time-series raster

How can I extract dates from a times series?