Yet Another CPAN Grep

Dump-Krumo ( B/BA/BAKERSCOT/Dump-Krumo-v0.1.4.tar.gz, BAKERSCOT, 2025; MetaCPAN )

Dump-Krumo/lib/Dump/Krumo.pm ( view source; MetaCPAN )

_spaces = 2; # Number of spaces to use for each level of indent
our $promote_bool  = 1; # Convert JSON::PP::Boolean to raw true/false

# Global var to track how many levels we're indented
my $current_

 . "\" :: ";
	my $reftype  = Scalar::Util::reftype($x);
	my $y;

	if ($promote_bool && $class eq 'JSON::PP::Boolean') {
		my $val = $$x;
		return __dump_bool(!!$val);
	}

	my $len = length($class) + 6

ur code, and disable them at runtime as needed.

=item C<$Dump::Krumo::promote_bool = 1>

Convert JSON::PP::Booleans to true/false instead of treating them as objects.

=item C<$Dump::Krumo::COLORS>