DOKK / manpages / debian 10 / libmojolicious-perl / Mojo::Content.3pm.en
Mojo::Content(3pm) User Contributed Perl Documentation Mojo::Content(3pm)

Mojo::Content - HTTP content base class

  package Mojo::Content::MyContent;
  use Mojo::Base 'Mojo::Content';
  sub body_contains  {...}
  sub body_size      {...}
  sub get_body_chunk {...}

Mojo::Content is an abstract base class for HTTP content containers, based on RFC 7230 <http://tools.ietf.org/html/rfc7230> and RFC 7231 <http://tools.ietf.org/html/rfc7231>, like Mojo::Content::MultiPart and Mojo::Content::Single.

Mojo::Content inherits all events from Mojo::EventEmitter and can emit the following new ones.

  $content->on(body => sub {
    my $content = shift;
    ...
  });

Emitted once all headers have been parsed and the body starts.

  $content->on(body => sub {
    my $content = shift;
    $content->auto_upgrade(0) if $content->headers->header('X-No-MultiPart');
  });

  $content->on(drain => sub {
    my ($content, $offset) = @_;
    ...
  });

Emitted once all data has been written.

  $content->on(drain => sub {
    my $content = shift;
    $content->write_chunk(time);
  });

  $content->on(read => sub {
    my ($content, $bytes) = @_;
    ...
  });

Emitted when a new chunk of content arrives.

  $content->on(read => sub {
    my ($content, $bytes) = @_;
    say "Streaming: $bytes";
  });

Mojo::Content implements the following attributes.

  my $bool = $content->auto_decompress;
  $content = $content->auto_decompress($bool);

Decompress content automatically if "is_compressed" is true.

  my $bool = $content->auto_relax;
  $content = $content->auto_relax($bool);

Try to detect when relaxed parsing is necessary.

  my $headers = $content->headers;
  $content    = $content->headers(Mojo::Headers->new);

Content headers, defaults to a Mojo::Headers object.

  my $size = $content->max_buffer_size;
  $content = $content->max_buffer_size(1024);

Maximum size in bytes of buffer for content parser, defaults to the value of the "MOJO_MAX_BUFFER_SIZE" environment variable or 262144 (256KiB).

  my $size = $content->max_leftover_size;
  $content = $content->max_leftover_size(1024);

Maximum size in bytes of buffer for pipelined HTTP requests, defaults to the value of the "MOJO_MAX_LEFTOVER_SIZE" environment variable or 262144 (256KiB).

  my $bool = $content->relaxed;
  $content = $content->relaxed($bool);

Activate relaxed parsing for responses that are terminated with a connection close.

  my $bool = $content->skip_body;
  $content = $content->skip_body($bool);

Skip body parsing and finish after headers.

Mojo::Content inherits all methods from Mojo::EventEmitter and implements the following new ones.

  my $bool = $content->body_contains('foo bar baz');

Check if content contains a specific string. Meant to be overloaded in a subclass.

  my $size = $content->body_size;

Content size in bytes. Meant to be overloaded in a subclass.

  my $boundary = $content->boundary;

Extract multipart boundary from "Content-Type" header.

  my $charset = $content->charset;

Extract charset from "Content-Type" header.

  my $clone = $content->clone;

Return a new Mojo::Content object cloned from this content if possible, otherwise return "undef".

  my $bytes = $content->generate_body_chunk(0);

Generate dynamic content.

  my $bytes = $content->get_body_chunk(0);

Get a chunk of content starting from a specific position. Meant to be overloaded in a subclass.

  my $bytes = $content->get_header_chunk(13);

Get a chunk of the headers starting from a specific position. Note that this method finalizes the content.

  my $size = $content->header_size;

Size of headers in bytes. Note that this method finalizes the content.

  my $bool = $content->headers_contain('foo bar baz');

Check if headers contain a specific string. Note that this method finalizes the content.

  my $bool = $content->is_chunked;

Check if "Transfer-Encoding" header indicates chunked transfer encoding.

  my $bool = $content->is_compressed;

Check "Content-Encoding" header for "gzip" value.

  my $bool = $content->is_dynamic;

Check if content will be dynamically generated, which prevents "clone" from working.

  my $bool = $content->is_finished;

Check if parser is finished.

  my $bool = $content->is_limit_exceeded;

Check if buffer has exceeded "max_buffer_size".

  my $bool = $content->is_multipart;

False, this is not a Mojo::Content::MultiPart object.

  my $bool = $content->is_parsing_body;

Check if body parsing started yet.

  my $bytes = $content->leftovers;

Get leftover data from content parser.

  $content
    = $content->parse("Content-Length: 12\x0d\x0a\x0d\x0aHello World!");

Parse content chunk.

  $content = $content->parse_body('Hi!');

Parse body chunk and skip headers.

  my $size = $content->progress;

Size of content already received from message in bytes.

  $content = $content->write;
  $content = $content->write('');
  $content = $content->write($bytes);
  $content = $content->write($bytes => sub {...});

Write dynamic content non-blocking, the optional drain callback will be executed once all data has been written. Calling this method without a chunk of data will finalize the "headers" and allow for dynamic content to be written later. You can write an empty chunk of data at any time to end the stream.

  # Make sure previous chunk of data has been written before continuing
  $content->write('He' => sub {
    my $content = shift;
    $content->write('llo!' => sub {
      my $content = shift;
      $content->write('');
    });
  });

  $content = $content->write_chunk;
  $content = $content->write_chunk('');
  $content = $content->write_chunk($bytes);
  $content = $content->write_chunk($bytes => sub {...});

Write dynamic content non-blocking with chunked transfer encoding, the optional drain callback will be executed once all data has been written. Calling this method without a chunk of data will finalize the "headers" and allow for dynamic content to be written later. You can write an empty chunk of data at any time to end the stream.

  # Make sure previous chunk of data has been written before continuing
  $content->write_chunk('He' => sub {
    my $content = shift;
    $content->write_chunk('llo!' => sub {
      my $content = shift;
      $content->write_chunk('');
    });
  });

Mojolicious, Mojolicious::Guides, <https://mojolicious.org>.

2019-02-05 perl v5.28.1