Select Code to Download

use strict;
use warnings;
...
  sub clear_it
  { %foo = (); }
} # end closure

Variable "%foo" will not stay shared at 60oehl line 123.