La Función dumpValue de dumpvar.pl

El módulo forma parte de la distribución de Perl desde la versión 5.5:

nereida:~> perl -MModule::CoreList -e \
   'print Module::CoreList->first_release("Data::Dumper")."\n"'
5.005

Si la versión de Perl con la que trabajamos es antigua, existe una solución se puede usar la función dumpValue que se encuentra en el fichero dumpvar.pl que se distribuye con la librerıa estandar. Sigue un ejemplo:

$ cat mydumpvalue.pl
#!/usr/bin/perl -w
use strict;

require 'dumpvar.pl';

my @a = (1, {A => ['AB', 'empty'], B => ['bB', 'empty']});

dumpValue(\@a); # recibe su argumento como una referencia
$ ./mydumpvalue.pl
0  1
1  HASH(0x8106af0)
   'A' => ARRAY(0x8103068)
      0  'AB'
      1  'empty'
   'B' => ARRAY(0x8106b68)
      0  'bB'
      1  'empty'