Form::Factory::Message - Handy class for encapsulating messages

version 0.020

  my $message = Form::Factory::Message->new(
      field   => 'foo',
      type    => 'warning',
      message => 'Blah blah blah',
  );

  if ($message->type eq 'warning' or $message->type eq 'error') {
      print uc($message->type);
  }

  if ($message->is_tied_to_field) {
      print $message->field, ": ", $message->message, "\n";
  }

This is used to store messages that describe the outcome of the various parts of the action workflow.

This is the name of the field the message belongs with. If set the is_tied_to_field predicate will return true.

This is the message itself. By convention, the message is expected to be formatted with the initial caps left off and no ending punctuation. This allows it to be more easily formatted or embedded into larger error messages, if necessary.

This is the type of message. Must be one of: info, warning, or error.

This capitalizes the first character of the message and adds a period at the end of the last character is a word or space character.

Andrew Sterling Hanenkamp <hanenkamp@cpan.org>

Copyright 2009 Qubling Software LLC.

This library is free software. You can redistribute it and/or modify it under the same terms as Perl itself.