Re: Setting break point for particular condition in the subroutine

Sometimes it's easier to use "$DB::single=1;" directly in your code. For example:

my @caller=caller(0);
$DB::single=1 if ($caller[0] eq 'package::of::interest' and $caller[3]
+ eq 'thatsub');
[download]

Comment on Re: Setting break point for particular condition in the subroutine Download Code