---
name: "AnyEvent::WebSocket::Message"
section: "3pm"
platform: "linux"
package: "libanyevent-websocket-client-perl"
version: "0.55-1"
release: "Debian 13 (Trixie)"
platforms: ["linux"]
url: "https://new.carta.tech/AnyEvent::WebSocket::Message"
---

# AnyEvent::WebSocket::Message(3pm)

WebSocket message for AnyEvent

## NAME

AnyEvent::WebSocket::Message - WebSocket message for AnyEvent

## VERSION

version 0.55

## SYNOPSIS

```
 $connection->send(
   AnyEvent::WebSocket::Message->new(body => "some message"),
 );

 $connection->on(each_message => sub {
   my($connection, $message) = @_;
   if($message->is_text || $message->is_binary)
   {
     my $body = $message->body;
   }
 });
```

## DESCRIPTION

Instances of this class represent a single WebSocket message.  They are the objects that come through from the other end of your AnyEvent::WebSocket::Connection instance.  They can also be sent through that class using its `"send"` method.

## ATTRIBUTES

### body

The body or payload of the message.

### opcode

The integer code for the type of message.

## METHODS

### decoded\_body

```
 my $body = $message->decoded_body;
```

Returns the body decoded from UTF-8.

### is\_text

```
 my $bool = $message->is_text;
```

True if the message is text.

### is\_binary

```
 my $bool = $message->is_binary;
```

True if the message is binary.

### is\_close

```
 my $bool = $message->is_close;
```

True if the message is a close message.

### is\_ping

```
 my $bool = $message->is_ping
```

True if the message is a ping.

### is\_pong

```
 my $bool = $message->is_pong;
```

True if the message is a pong.

## SEE ALSO

- •

  AnyEvent::WebSocket::Client

- •

  AnyEvent::WebSocket::Connection

- •

  AnyEvent::WebSocket::Server

- •

  AnyEvent

- •

  RFC 6455 The WebSocket Protocol \<http://tools.ietf.org/html/rfc6455\>

## AUTHOR

Author: Graham Ollis \<plicease@cpan.org\>

Contributors:

Toshio Ito (debug-ito, TOSHIOITO)

José Joaquín Atria (JJATRIA)

Kivanc Yazan (KYZN)

Yanick Champoux (YANICK)

Fayland Lam (FAYLAND)

Daniel Kamil Kozar (xavery)

## COPYRIGHT AND LICENSE

This software is copyright (c) 2013-2022 by Graham Ollis.

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.