view release on metacpan or  search on metacpan

socialcalc/third-party/lib/PocketIO.pm  view on Meta::CPAN

use base 'Plack::Component';

our $VERSION = '0.00904';

use Plack::Util ();
use Plack::Util::Accessor qw(resource handler class instance method);

use PocketIO::Resource;

sub new {
    my $self = shift->SUPER::new(@_);

    $self->handler($self->_get_handler);

    return $self;
}

sub call {
    my $self = shift;
    my ($env) = @_;

socialcalc/third-party/lib/PocketIO/Transport/XHRMultipart.pm  view on Meta::CPAN

use strict;
use warnings;

use base 'PocketIO::Transport::Base';

use PocketIO::Handle;
use PocketIO::Response::Chunked;

sub new {
    my $self = shift->SUPER::new(@_);

    $self->{boundary} ||= 'socketio';

    return $self;
}

sub name {'xhr-multipart'}

sub dispatch {
    my $self = shift;