Select Code to Download

$ perl -d pm_135391.pl
Loading DB routines from perl5db.pl version 1.49_001
...
  DB<1> p "<$_>"
<Abby
>

  DB<2> n
main::(pm_135391.pl:3):   my $key = lc $_;
...
  DB<2> x %seen
0  "abby \cM"
1  1

  DB<3> n
main::(pm_135391.pl:6):   push @{$words{$signature}}, $_;
...
  y [n [Vars]]   List lexicals in higher scope <n>.  Vars same as V.
  e     Display thread id     E Display all thread ids.
For more help, type h cmd_letter, or run man perldebug for all docs.