I run into the $DB::single = 1 problem a lot too. I do the same as you, but come to think of it, this somewhat ugly snippet would work too:

  ${$DB::{single}} = 1;
[download]