ASP4::Mock::ClientSocket - Mimics APR::Socket object

ASP4 documentation Contained in the ASP4 distribution.

Index

Code Index:

NAME

Top

ASP4::Mock::ClientSocket - Mimics APR::Socket object

SYNOPSIS

Top

  my $socket = $r->connection->client_socket

DESCRIPTION

Top

Mimics (minimally) the APR::Socket object.

PUBLIC METHODS

Top

close( )

Internal use only.

BUGS

Top

It's possible that some bugs have found their way into this release.

Use RT http://rt.cpan.org/NoAuth/Bugs.html?Dist=ASP4 to submit bug reports.

HOMEPAGE

Top

Please visit the ASP4 homepage at http://0x31337.org/code/ to see examples of ASP4 in action.

ASP4 documentation Contained in the ASP4 distribution. 
package ASP4::Mock::ClientSocket;

use strict;
use warnings 'all';

sub new {
  return bless {
    on_close  => sub { },
  }, shift;
}

sub on_close { my $s = shift; $s->{on_close} = shift }
sub close { shift->{on_close}->( ) }

1;# return true: