print Data::Dumper->new(\%foo)->Indent(3)->Dump;