Fixed incompatibility with perl 5.8

Very small fix to make that compatible with Perl 5.8.

It is still around..