The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Test::TCP - testing TCP program

SYNOPSIS

    use Test::TCP;
    my $port = empty_port();
    test_tcp(
        client => sub {
            my $port = shift;
            # send request to the server
        },
        server => sub {
            my $port = shift;
            # run server
        },
    );

DESCRIPTION

Test::TCP is test utilities for TCP/IP program.

METHODS

empty_port
    my $port = empty_port();

search empty port

test_tcp
    test_tcp(
        client => sub {
            my $port = shift;
            # send request to the server
        },
        server => sub {
            my $port = shift;
            # run server
        },
        # optional
        port => 8080
    );
wait_port
    wait_port(8080);

Waits for a particular port is available

AUTHOR

Tokuhiro Matsuno <tokuhirom@gmail.com>

SEE ALSO

LICENSE

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