% echo 'sub afterinit { $DB::single = 1 }' >> .perldb