5 print "Fixing $file\n";
7 open(IN, "<$file") || die "cannot open $file for reading\n";
8 open(OUT, ">$file.new") || die "cannot open $file.new for writting\n";
11 s/^AR = ar$/AR = CC -ar/;
12 s/\$\(AR\) cru /\$\(AR\) -o /;
16 rename("$file.new", "$file") || die "cannot rename $file.new to $file\n";