Yet Another CPAN Grep

Test-TraceCalls ( T/TO/TOBYINK/Test-TraceCalls-0.001.tar.gz, TOBYINK, 2019; MetaCPAN )

Test-TraceCalls/lib/Test/TraceCalls.pm ( view source; MetaCPAN )

mple ();
		use Carp ();
		use File::Spec ();
		use FindBin ();
		use Hook::AfterRuntime ();
		use JSON::PP ();
		use Sub::Util 1.40 ();
		1;
	} || die($@) if ACTIVE;
};

our %CALL;

sub import {
	my $

};
	*{"$package\::$sub"} = $newcode;
}

END {
	if (ACTIVE) {
		my $JSON = 'JSON::PP'->new->pretty(1)->canonical(1);
		my $map  = $JSON->encode(\%CALL);
		
		my $outfile = 'File::Spec'->catfile(
			$Fi

very file "t/foo.t" in your test suite, Test::TraceCalls will
generate "t/foo.t.map" containing a JSON summary of which subs got
called by that test file.

=head1 DESCRIPTION

Test::TraceCalls will tr