$ perl -e'use Devel::LeakTrace::Fast; { my $x = []; }'
leaked SV(0x0x814ec28) from -e line 1
leaked SV(0x0x814ed84) from -e line 1

$ perl -e'use Devel::LeakTrace::Fast; { my $x = []; 1; }'

$ perl -e'use Devel::LeakTrace::Fast; { my $x = []; } 1;'

$