in reply to Variable listing

Try Devel::LeakTrace::Fast.

print+qq(\L@{[ref\&@]}@{['@'x7^'!#2/"!4']});