Changes for version 0.15

  • DB.XS Fixed ( not longer working for Perl >= v5.21.5 ) broken in commit [perl #122445] use magic on $DB::single etc to avoid overload issues)
    • static void my_init_debugger() { dTHR;
  • PL_curstash = PL_debstash;
  • PL_dbargs =
  • GvAV(gv_AVadd((gv_fetchpv("DB::args", GV_ADDMULTI, SVt_PVAV))));
  • AvREAL_off(PL_dbargs);
  • PL_DBgv = gv_fetchpv("DB::DB", GV_ADDMULTI, SVt_PVGV);
  • PL_DBline = gv_fetchpv("DB::dbline", GV_ADDMULTI, SVt_PVAV);
  • PL_DBsub = gv_HVadd(gv_fetchpv("DB::sub", GV_ADDMULTI, SVt_PVHV));
  • PL_DBsingle = GvSV((gv_fetchpv("DB::single", GV_ADDMULTI, SVt_PV)));
  • sv_setiv(PL_DBsingle, 0);
  • PL_DBtrace = GvSV((gv_fetchpv("DB::trace", GV_ADDMULTI, SVt_PV)));
  • sv_setiv(PL_DBtrace, 0);
  • PL_DBsignal = GvSV((gv_fetchpv("DB::signal", GV_ADDMULTI, SVt_PV)));
  • sv_setiv(PL_DBsignal, 0);
  • PL_curstash = PL_defstash;
  • Perl_init_debugger(aTHX); }
  • Debian patches added (https://salsa.debian.org/perl-team/modules/packages/libapache-db-perl)

Modules

Run the interactive Perl debugger under mod_perl
Hook Devel::DProf into mod_perl
Hook Devel::SmallProf into mod_perl