sub mod_perl_here {
  my $doesnt_work_like_you_expect = 7;
  sub sub_inside_sub_and_doesnt_look_like_it {
    print "$doesnt_work_like_you_expect <-- odd, it doesn't reinitialize...\n";
  }
}