Line 5:
 use Hook::LexWrap;
++ use Data::Dumper;

Line 31:
  return sub{
++    local $Data::Dumper::Indent = 0;
++    local $Data::Dumper::Terse = 1;

Line 37:
--      $pkg, $sym, $self->{verbose},
++      $pkg, $sym, 
++	  ( $start && $self->{params} ? '( '.join( ", ", Dumper(@_[0..$#_-1])).")" : ()),
++      $self->{verbose},