You replace one line in a file by rewriting the whole file( at least that is the easiest way). So you can use one of the two snippets above (I believe both work, but there seems to be dissent, so check first) to read your .ini file and write the results to a new file. Check if it is good and then copy it over the original .ini file.

If you feel confident in the script you can also automatically have Perl overwrite the input file with the -i switch.

perl -i rep.pl config.ini
[download]

I'm having some trouble getting it to work.
Will you look at my code and see what could be wrong?



$cs="d:\\Perl\\Compiler_Setup.ini";

open cs or die "Cannot open $cs for read :$!";

while (<cs>) {
  if  (m/"Gimpel PC-Lint for H8]"/){
    # read the line to be replaced
    my $line = <cs>;
    # do something with it
    $line =~ s/1/0/;
    # print the new version
    print $line;
 }
}
[download]


Right now it just doesn't do anything.
in a command prompt I write
perl "replace test.pl"
and then it just goes back to d:\perl> as if it ran the program, and then just goes back to where I was before. It says:

D:\Perl>perl "replace test.pl"

D:\Perl>

You seem to have trouble opening the file. Perl can do this for you. Try this:

while (<>) {
  print;
  if  (m/Gimpel PC-Lint for H8\]/){
    # read the line to be replaced
    my $line = <>;
    # do something with it
    $line =~ s/1/0/;
    # print the new version
    print $line;
 }
}
[download]

and run it as "perl replace_test.pl Compiler_Setup.ini". If the output looks okay, use "perl -i replace_test.pl Compiler_Setup.ini"