print Dumper $quux; #### use IO::File; Dumper->print($quux); #### print Data::Dumper->new([$quux],['quux'])->Dump(),"\n"; #### # we have large cyclic structures: disable pretty indent, enable purity mode. print Data::Dumper->new([$quux],['quux'])->Purity(1)->Indent(1)->Dump(),"\n";