$ perl -d p5dbglob.pl . . .

Loading DB routines from perl5db.pl version 1.33
Editor support available.

Enter h or `h h' for help, or `perldoc perldebug' for more help.

main::(p5dbglob.pl:8):  Main( @ARGV );
  DB<1> s
main::Main(p5dbglob.pl:11):         for my $dir ( @_ ){
  DB<1> s
main::Main(p5dbglob.pl:12):             chdir $dir or die $!;
  DB<1> s
main::Main(p5dbglob.pl:13):             Fudge( $dir, glob '*' );
  DB<1> s Fudge
main::Main((eval 8)[C:/perl/5.14.1/lib/perl5db.pl:640]:3):
3:      Fudge;
  DB<<2>> s
main::Fudge(p5dbglob.pl:17):        my $dir = shift;
  DB<<2>> s
main::Fudge(p5dbglob.pl:18):        my $count = @_;
  DB<<2>> q