makes sysread not accept bareword filehandles

```
use strict;
use IO::Socket::Timeout;
open(ENC, 'aaa');
my $data;
sysread(ENC, $data, 1);
```

error is

```
Bareword "ENC" not allowed while "strict subs" in use at line 5
```

Discovered while investigating why perl -MRedis -MXML::Twig result in a error.
