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

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

main::(swdtest.tmp:9):	Foo::foo(3);
  DB<1> Foo::foo(swdtest.tmp:5):	  my $s;
  DB<1> Foo::foo(swdtest.tmp:6):	  $s += Bar::bar($_) for 1..$_[0];
  DB<1> Foo::foo(swdtest.tmp:6):	  $s += Bar::bar($_) for 1..$_[0];
  DB<1> Bar::bar(swdtest.tmp:2):	sub bar { $_[0] * $_[0] }
Bar::bar(swdtest.tmp:3):	package Foo;
Bar::bar(swdtest.tmp:4):	sub foo {
  DB<1> Bar::bar(swdtest.tmp:2):	sub bar { $_[0] * $_[0] }
Bar::bar(swdtest.tmp:3):	package Foo;
Bar::bar(swdtest.tmp:4):	sub foo {
  DB<1> Bar::bar(swdtest.tmp:2):	sub bar { $_[0] * $_[0] }
Bar::bar(swdtest.tmp:3):	package Foo;
Bar::bar(swdtest.tmp:4):	sub foo {
  DB<1> 