Metabase::Fact::String(3pm) User Contributed Perl Documentation Metabase::Fact::String(3pm)

Metabase::Fact::String - fact subtype for simple strings

version 0.025

  # defining the fact class
  package MyFact;
  use Metabase::Fact::String;
  our @ISA = qw/Metabase::Fact::String/;
  sub content_metadata {
    my $self = shift;
    return {
      'size' => [ '//num' => length $self->content ],
    };
  }
  sub validate_content {
    my $self = shift;
    $self->SUPER::validate_content;
    die __PACKAGE__ . " content length must be greater than zero\n"
      if length $self->content < 0;
  }

...and then...

  # using the fact class
  my $fact = MyFact->new(
    resource => 'RJBS/Metabase-Fact-0.001.tar.gz',
    content  => "Hello World",
  );
  $client->send_fact($fact);

Base class for facts that are just strings of text. Strings must be characters, not bytes.

You may wish to implement a "content_metadata" method to generate metadata about the hash contents.

You should also implement a "validate_content" method to validate the structure of the hash you're given.

Please report any bugs or feature using the CPAN Request Tracker. Bugs can be submitted through the web interface at <http://rt.cpan.org/Dist/Display.html?Queue=Metabase-Fact>

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.

This software is Copyright (c) 2016 by David Golden.

This is free software, licensed under:

  The Apache License, Version 2.0, January 2004
2022-10-14 perl v5.36.0