Select Code to Download

use strict;
use warnings;
...
print '  x3: ', $stash->get('x3'), "\n";
print "Note that we could check more easily via _dump:\n";
print $stash->_dump(), "\n";

Inside the processed template:
  x1 = x1_defined_in_template
...
        x1               => x1_defined_in_stash_set
        _PARENT          => <undef>
    }

use strict;
use warnings;
...

use Data::Dumper; $Data::Dumper::Sortkeys=1;
print Dumper( \%Template::Capturing::Stash::remembering_hash );

Inside the processed template:
  x1 = x1_defined_in_template
...
          'x2' => 'x2_defined_in_stash_set',
          'x3' => 'x3_defined_in_process_t_vars'
        };