DB<9> < my $f = 42;
  DB<10> x $f
0  undef
  DB<11> << local $g = 15;
  DB<12> x $g 
0  undef