346,351c346,349
<     if (_ReadConsole($self->{'handle'}, $buffer, $number) == $number) {
<         return $buffer;
<     }
<     else {
<         return undef;
<     }
---
>     $number = _ReadConsole($self->{'handle'}, $buffer, $number);
>     return undef unless $number;
>     substr($buffer, $number) = "";
>     return $buffer;
