In my quest to find something useful to do with Flash, I have made another tool with the Kamaitachi Flash Media Server: http://vconf.devstack.com/ - instant video chat.

The code (from my perspective) is this short:

#!/usr/bin/perl

use strict;
use warnings;
use FindBin::libs;
use lib "$FindBin::Bin/lib";
use Kamaitachi;

$SIG{PIPE} = sub { };

my $kamaitachi = Kamaitachi->new;
$kamaitachi->register_services(
  'stream/live' => 'Service::LiveStreaming',
);
$kamaitachi->run;
[download]

Please Try It Out

Under the hood, it uses Danga::Socket for networking and I have not been able to push it to its limit. I would like to have a lot of people go there and try it out.

Thanks!