accelerated stepping

Hi,

often during single-stepping I am missing a command like 'n' to step
over not only subroutine calls, but also complete map and grep-commands.

Example:

Instead of

main::(perldb_demo.pl:4):       my @a = (1..10);
  DB<1> n
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:7):               print "found\n";

I would like to use

main::(perldb_demo.pl:4):       my @a = (1..10);
  DB<1> N
main::(perldb_demo.pl:6):       if (0 < scalar grep { $_ == 9 } @a) {
  DB<1> 
main::(perldb_demo.pl:7):               print "found\n";

How could that be done?

I could imagine $DB::single can be set to 3 for this 'accelerated'
stepping.

May I reserve the capital N for that command?

Thanks,
Heiko
--