<div dir="ltr"><div dir="ltr"><div dir="ltr"><div>Setting $/ breaks perl itself.</div><div><br></div><div>Net::DNS reads /etc/resolv.conf using:</div><div><br></div><div>       local $_;<br>        while (<$filehandle>) {<br>                s/[;#].*$//;                                    # strip comments<br><br>                /^nameserver/ && do {<br>       ...</div><div>       }</div><div><br></div><div>Not only does <$filehandle> return the entire file as it enters the loop, but the $ in the regex also fails to work as advertised.</div><div><br></div><div><br></div><div></div><div><div><div><br></div></div></div></div></div></div>