view release on metacpan or  search on metacpan

examples/client.pl  view on Meta::CPAN

#!/usr/bin/perl -w

use lib '/Users/dws/checkouts/github/AnyEvent-Chromi/lib';
use 5.014;

use AnyEvent;
use AnyEvent::Chromi;

sub main
{
    my $cv = AnyEvent->condvar;

    AnyEvent::Chromi->new(mode => 'client', on_connect => sub {