http://www.perlmonks.org?node_id=1122623


in reply to Re: Searching for AE for Thrift
in thread Searching for AE for Thrift

Yep, but it doesn't work from box.
I've tried to change
$protocol = Thrift::BinaryProtocol->new($transport);
to
$protocol = Thrift::XS::BinaryProtocol->new($transport);
Got error:
Can't call method "write" on an undefined value at /home/dev01/lib/Hbase/Hbase.pm line 9858

 9855 sub send_getTableNames{
 9856   my $self = shift;
 9857 
 9858   $self->{output}->writeMessageBegin('getTableNames', TMessageType::CALL, $self->{seqid});
 9859   my $args = new Hbase::Hbase_getTableNames_args();
 9860   $args->write($self->{output});
 9861   $self->{output}->writeMessageEnd();
 9862   $self->{output}->getTransport()->flush();
 9863 }

Looks like it requires additional changes, like custom transport and socket :(