Oops! Sorry! Egg on face :-(

foo.pl contains use Data::Printer. The output format, in the examples below, has nothing to do with .perldb's contents or existence. I've stricken it all and, because it was quite long, put it in a spoiler.