NAME

IORTable::Locator - A callback interface to locate object keys.

SYNOPSIS

  package MyLocator;

  use IORTable::Locator;
  our @ISA = qw(IORTable::Locator);

  sub new {
    my $class = shift;
    my $self  = $class->SUPER::new();
    ...
    return $self;
  }

  sub locate {
    my($self, $key) = @_;
    ...
    if ($found) {
      return $ior;
    }

    throw IORTable::Table::NotFound();
  }

1;

Implement this interface and call IORTable::Table::set_locator() to enable custom IOR retrieval.