Select Code to Download

  DB<2> $s = Symbol::gensym

...
  DB<9> x $s
0  GLOB(0x86285b8)
   -> *Symbol::GEN0

*  DB<8> x \%{*Symbol::GEN0}
0  HASH(0x8aab260)
...
*  DB<17> x \%{*{"$s"}}
0  HASH(0x8b73c10)
     empty hash