sub callers_args { return DB::caller_caller(@_); } sub DB::caller_caller { my($level) = @)_; local @DB::args; caller($level+1); return @DB::args; }