[perl5db] Extract a method.