use Data::TreeDumper;
$Data::TreeDumper::Displayaddress = 0;
print DumpTree({
   a => "z\n",
   b => "z[\\n]",
   'c = d' => 'e = f',
});
__END__
|- a = z[\n]
|- b = z[\n]
`- c = d = e = f