The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Class::ReluctantORM::Monitor::Timer - Track running time of queries

SYNOPSIS

  use aliased 'Class::ReluctantORM::Monitor::Timer';
  my $mon = Timer->new(highwater_count => N, fatal_threshold => X);
  Class::ReluctantORM->install_global_monitor($mon);
  Pirate->install_class_monitor($mon);

  # Do a query....
  Pirate->fetch(...);

  # Read from the monitor - decimal seconds
  my $count = $mon->last_measured_value();

DESCRIPTION

A monitor that watches the amount of wall time used to execute a query.

This is a Measuring Monitor.