#5 Is it really so easy to fix Devel::ptkdb to support lvalue sub's?

[Rolf Wagner]

I have to use a Perl Lib that use lvalue subs. For debugging i use since years Devel::ptkdb. While debugging the Devel::ptkdb die with the message “can't modify non-lvalue subroutine call”.

So i start to investigate that problem and for now the resolution is add following sub to Devel::ptkdb:

sub lsub :lvalue {  
  local $DB::single = 0;

  no strict;
  return &$DB::sub;
}

So my question is 'is it really so easy'?