my @caller = CORE::caller($i++) or return;

##</code><code>##

my @caller = CORE::caller() eq 'DB'
      ? do { package DB; CORE::caller($i++) }
      : CORE::caller($i++)
   or return;