Bug#845200: libnet-dns-perl: Setting $/ to "\r\n" breaks Net::DNS

[Dick Franks]

Setting $/ breaks perl itself.

Net::DNS reads /etc/resolv.conf using:

       local $_;
        while (<$filehandle>) {
                s/[;#].*$//;                                    # strip
comments

                /^nameserver/ && do {
       ...
       }

Not only does <$filehandle> return the entire file as it enters the loop,
but the $ in the regex also fails to work as advertised.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://alioth-lists.debian.net/pipermail/pkg-perl-maintainers/attachments/20190219/0b638494/attachment.html>