NAME

DBIO::Replicated::DebugProxy - Prefix trace output with replicated backend identity

VERSION

version 0.900004

DESCRIPTION

A trace (debugobj) wrapper installed per backend by "install_debug_proxy" in DBIO::Replicated::Backend. It forwards everything to the real trace object, but rewrites the SQL passed to query_start and query_end so it names the backend it ran on: SELECT [DSN_REPLICANT=...] ... when the DSN is known, else SELECT [REPLICANT=$id] ..., else just the kind. A password in the DSN is shown as ***.

METHODS

new

my $proxy = DBIO::Replicated::DebugProxy->new(
  backend => $backend,
  target  => $debugobj,
);

backend

The DBIO::Replicated::Backend whose identity is added to the SQL.

target

The real trace object everything is forwarded to.

callback

debugfh

silence

print

txn_begin

txn_commit

txn_rollback

svp_begin

svp_release

svp_rollback

Forwarded unchanged to "target".

query_start

query_end

Forwarded to "target" with the SQL prefixed by the backend's identity, as described above.

AUTHOR

DBIO & DBIx::Class Authors

COPYRIGHT AND LICENSE

Copyright (C) 2026 DBIO Authors Portions Copyright (C) 2005-2025 DBIx::Class Authors Based on DBIx::Class, heavily modified.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.