remove bug for more current perl version

git-svn-id: svn://svn.code.sf.net/p/fhem/code@4762 2b470e98-0d58-463d-a4d8-8e2adae1ed80