/dev-perl/bareword-filehandles/