perl5db - how to step into my sub without stepping into glob

[Anonymous Monk]

My file p5dbglob.pl

#!/usr/bin/perl --
use strict; use warnings;
Main( @ARGV );
exit( 0 );
sub Main {
    for my $dir ( @_ ){
        chdir $dir or die $!;
        Fudge( $dir, glob '*' );
    }
}
sub Fudge {
    my $dir = shift;
    my $count = @_;
    print "$dir => $count \n";
}

I want to step into Fudge() but without stepping into glob ( File::Glob::csh_glob ... ), but how?

[Anonymous Monk]

Ok, found the answer after asking the question, its s Fudge or s main::Fudge

Read more... (944 Bytes)

Before that I also found you can exit the subroutine you stepped into with r

Read more... (1161 Bytes)

Thanks

[bibliophile]

Heh. I go out of my way to *not* step into Fudge() :-)

[chrestomanci]

Looks like you have found one answer by providing a function name to s (step).

Another way is to c <sub name> or b <sub name>

Yet another method, is to edit the source to force a breakpoint. If you add DB::single = 1; to your code then the debugger will stop on the next statement.

This can be very helpful if the fully qualified name of your function is not clear, or if it is dynamically compiled. It can be a problem though as once you set a breakpoint that way, you can't turn it off without editing your code again and restarting your program.

[trwww]

Along with the other suggestions, you can (s)tep and you will be in File::Glob::csh_glob, as you noted. If you then press (r)eturn, you'll be in Fudge.