Subject: | Domain with \n at label end validades. |
How to reproduce bug:
print Data::Validate::Domain::is_domain("example\n.com");
print Data::Validate::Domain::is_domain_label("foo\n");
Bug is in is_domain_label. "$" is used to match end of string.
("$" also match endline at the end).