K
kamal
I am trying to dump a hash using Data:umper.
I need to quote the keys while dumping.
My progarm looks like this
use Data:umper;
$Data:umper::Quotekeys = 1;
$Data:umper::Useqq = 1;
my %tmp ;
$tmp{'1'} = "l";
$tmp{'2'} = "u";
open (STDOUT, ">");
print STDOUT Data:umper->Dump([\%tmp], ['*tmp']);
close STDOUT ;
---------------------------------------------------
Output
%tmp = (
1 => "l",
2 => "u"
);
---------------------------------------
i need it as
%tmp = (
'1' => "l",
'2' => "u"
);
Can anyone help out with this
Thanks
Kamal
I need to quote the keys while dumping.
My progarm looks like this
use Data:umper;
$Data:umper::Quotekeys = 1;
$Data:umper::Useqq = 1;
my %tmp ;
$tmp{'1'} = "l";
$tmp{'2'} = "u";
open (STDOUT, ">");
print STDOUT Data:umper->Dump([\%tmp], ['*tmp']);
close STDOUT ;
---------------------------------------------------
Output
%tmp = (
1 => "l",
2 => "u"
);
---------------------------------------
i need it as
%tmp = (
'1' => "l",
'2' => "u"
);
Can anyone help out with this
Thanks
Kamal