DB<1> sub my::xyz {warn "xyz" }  # declaration

  DB<2> my::xyz()                  # call
xyz at (eval 10)[C:/Perl_524/lib/perl5db.pl:737] line 2.