Fix parse error on perl 5.8