Net::SPOCP - Perl implementation of the SPOCP protocol

  use Net::SPOCP;

  my $client = Net::SPOCP::Protocol->new(server=>'host:port');
  my $res = $client->query([a => [ ru => 'le' ],[ another => 'rule']);
  print "%s\n",$res->is_error ? "denied (".$res->error.")" : 'authorized';

Implements the protocol described at http://www.spocp.org.

Leif Johansson <leifj@it.su.se> Klas Lindfors <kllin@it.su.se>

Only query is implemented currently

perl. http://www.spocp.org