use Devel::StealthDebug;
...
#!dump( $var, \@foo, \%bas )!
...
#!watch( $volatile )! ## Only traced when it changes.
...
----outputs----
$ $var = 7;
$\@foo = [
  123,
  456,
];
$\%bas = {
  'a' => 1,
  'b' => 2,
};
 in Test::new at Test.pm line 31