--- /home/mnni/Protocol-Modbus-0.09/lib/Protocol/Modbus/Transport/TCP.pm	2012-07-14 17:35:40.000000000 +0200
+++ /usr/lib/perl5/site_perl/5.8.8/Protocol/Modbus/Transport/TCP.pm	2012-11-09 17:17:47.000000000 +0100
@@ -66,7 +66,7 @@
     # Get socket
     my $sock = $self->{_handle};
 
-    $sock->recv(my $data, 100);
+    $sock->recv(my $data, 256);
 
     #warn('Received: [' . unpack('H*', $data) . ']');
 
