Data-Dumper

用Data::Dumper序列化数据：


#!/usr/bin/perl

use Data::Dumper;

$data = { a => "b", c => [1,2,3], d => { e => "f", g => "h" }};

$d = Data::Dumper->new([$data]);
$result = $d->Terse(1)->Indent(0)->Pair('=>')->Quotekeys(0)->Sortkeys(1)->;Dump();
print $result, "\n";