$entry =~ tr/\r//d;