Switch all calls to open() to explicitly open for read

This commit is contained in:
Jamie Cameron
2020-03-14 17:20:54 -07:00
parent 3093838b5b
commit a2dc3f7124
248 changed files with 548 additions and 552 deletions

View File

@@ -33,7 +33,7 @@ sub parse_ppp_options
{
local @rv;
local $lnum = 0;
open(OPTS, $_[0]);
open(OPTS, "<".$_[0]);
while(<OPTS>) {
s/\r|\n//g;
if (/^#\s*(.*)/) {