view release on metacpan or  search on metacpan

lib/DarkPAN/Indexer/Storage.pm  view on Meta::CPAN

#   trying to acquire; 0 = don't wait). Mechanism is engine-specific
#   (S3 conditional-PUT vs flock); the contract above is not.
requires 'lock';

# --- read path --------------------------------------------------------
#
# base_url() -> the public base URL from which a read-only consumer (the
#   resolver) reaches this DarkPAN, or undef if it has none (e.g. a
#   purely local store with no web front). The resolver fetches
#   "{base_url}/{index path}". This is derived from config (`url`), not
#   from the storage backend's own endpoint -- an S3 store fronted by
#   CloudFront reads from the CloudFront domain, not the bucket.
requires 'base_url';

########################################################################
sub _slurp {
########################################################################
  my ( $self, $file ) = @_;

  local $RS = undef;